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ATOM NIEUWS is een uitgave van de fed. atom computerclubs n/b 
en verschijnt & — B keer per jaar. 


De redaktie gaat er vanuit dat de ingezonden copy gemaakt is 
door de inzender tenzij uitdrukkelijk anders is vermeld. 

De aansprakelijkheid voor auteursrechten voor ingezonden copy 
ligt dan ook voîledig bij de inzender. 
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Van de voorzitter 


In het vorige nummer van ATOM NIEUWS ontbrak een artikeltje van 
mijn hand, dus wens ik nu alsnog alle ATOMISTEN en hun familie 
een gezond, voorspoedig en computerrijk 1986 toe. 


Ondertussen hebben we de Algemene vergadering achter de rug en 
heeft er een bestuurswisseling plaatsgevonden. 

In nummer 7 van 1985 meldde ik al dat Theo, Henk en Peter hun 
functie binnen het bestuur van de Federatie zouden neerleggen. 
Het ís gelukt om voor hun vervangers te vinden en zelfs om het 
bestuur uit te breiden naar 7 man. 


De nieuwe leden zijn : 


Dhr. Rutten uit Groenekan, hij is administrateur van beroep en 
gaat zich over onze ruilmiddelen ontfermen. 


Peter Grevelt uit Den Helder en heeft zich bereid verklaard om 
de clubwinkel te runnen. 


Yvo Tuk uit Ridderkerk is als senator uit de HardWare Commissie 
(HWC) in onze eerste kamer gekomen. 


Harry de Ruiter is als opperhoofd van de rooksignalen-afdeling 
in de grote pawwan getreden. 


Ed Schijf, eveneens uit bovengenoemde afdeling, is voor harde 
waren toegetreden in de kring van stamoudsten. 


Daarnaast ís een nieuwe HWC geinstalleerd onder aanvoering van 
Yvo Tuk, De andere leden zijn: 

C‚ van Leuven (Belgie), W. Visser, J. v/d Veen, H. de Ruiter 
(alle 3 uit Overijssel/Gelderland), C. de Moor (Limburg) en R. 
v. Drunen (Noord). 





Als laatste punt vanuit de A.L.V. wil ík melden dat : 


Th. van Kempen 
en 
H. Reinders 


door de vergadering, vanwege hun inzet voor de vereniging in de 
afgelopen 2 jaar, zijn benoemd tot ERELEDEN van DE FEDERATIE 
VAN ATOM COMPUTERCLUBS NEDERLAND/BELGIE. 


Tevens is er een commissie ingesteld voor het inventariseren 
van ge programma's die er in de club zijm- Mocht je nog 
programma's hebben die je zelf hebt gemaakt, of waarvan je 
denkt ‘oh dat hebben ze vast nog niet’, stuur dit dan naar …het 
bandjes archief van je regio, die zorgen dan dat het op zijn 
plaats komt. 

Dit voor wat betreft de ALV. 


Op het gebied van hardware zaken kan ik meiden dat de 8O-koloms 
kaart naar behoren werkt. De film wordt bijgewerkt en dan wordt 
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er 1. proefexemplaar gemaakt die dan door een volslagen leek 
(JBL) Ìn elkaar gezef moet worden m.b.v, de bouw handleiding 


die ondertussen ook al gereed is, en dit geheel moet dan 
werken. Als dat niet lukt is er toch nog iets mis, maar laten 
we dat maar niet hopen. 


De film voor de nieuwe disk controler kaart neemt nu ook vormen 
aan zodat naar we hopen vrij snel de proefprinten gemaakt 
kunnen worden. 


Zodra een project afgesloten is, en dat zal binnenkort de 
B@-kolomskaart zijn, dan wordt door de mensen die daaraan 
hebben gewerkt aan een nieuw project begonnen worden, want 
ideeen zijn er genoeg. 

B.V. een R5-232 kaart met ATOMbus, een printerbuffer, een 
nieuwe programmerkaart voor alle type eprom’s, een PIA-kkart en 
ga zo maar door. 

Mocht er iemand zijn die zich hier al eens over gebogen heeft, 
ef die zoiets al eens gemaakt heeft, laat het dan weten en 
stuur de informatie naar Yvo Tuk. Ook andere ideeen zijn 
welkom. 


Jullie aller voorzitter, 


Nico Stad. 













Fk BENNATWAR Lik WEL EVEN 
TVEVALLIG NOG MTD DE 
ZITTER 


PR. 6 ATOM NIEUWS IHHOUD REGIO-SCHI VEN 


inhoud regioschijf 1986 — 2 


TIJDST. 2900 C2B2 B@EFS pag 8 
BAD IN 2900 C2B2 BBID4 pag 28 
GDOS1.5 2900 C2B2 US4F8 pag 30 
CASDIS 2909 C2B2 BOACH pag 76 
AU.BAS 2908 C2B2 @027C pag 67 
AD>GD 2902 C2B2 DLLIB pag 66 


MOL IST 3028 C2B2 OOBBA pag 79 


REGIOBI JEENKOMSTEN ATOM NIEUWS PRG. 





maandag 3 maart 
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Centrum 
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oost 








eerste vrijdag van elke maand 
plaats: zaal Huveneers, Sittard 
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Tijd-Stop 


Ket programma "Tijd-Stop"” is bijna 4K groot en beslaat 

geassembleerd ongeveer H50 bytes machinecode. Het is geschreven 

met behulp van de mini-assembler, die gebruik maakt van 

P-Charme. Ook de erin beschreven commando's “TIME”, *PSIOP" en 

*PCON" zijn in eerste instantie bedoeld ais uitbreidings- 

statements voor P-Charms. Met een kleine aanpassing zijn ze 

echter zonder meer in elke 505 in te bouwen. 

Wat doen nu deze commando's? Zoals U wellicht weet, kent 

P-Charme reads de commando's "STOP" en "CONT”, die ervoor 

dienen om sen programma tijdelijk te kunnen onderbreken om hv, 

de waarde van een variabele uit te lezen, en het programma 
vervolgens vansf diezelfde plaats weer voort te zetten. De 
hierboven genoemde commando's zijn bedoeld als een aanvulling 
op deze Faciliteit. Ze werken onder interrupt, hetgeen 
impliceert dat de aanwezigheid van een UIA is vereist en dat 

LINK 2 gesloten moet zijn. Het commando ”TIME" start een teller 

die elke honderdste seconde met 1 wordt verhoogd, De verstreken 

tijd Cin seconden) is te allen tijde uit te lezen met: ”PRINT 

!#22C/100”, Het bereik van de teller is 497 dagen, dus U kunt 

wel even vooruit! 

De routine kan op 4 manieren worden gestopt: 

A) door de BREAK-toets Cvrij definitief). 

8) doordat het programma klaar is of wordt afgebroken (door de 
ESC-toets of door sen Foutmelding). Het stoppen gebeurt dan 
automatisch. 

CE} door het commando ”PSTOP"”, 
D) door het tegelijk indrukken van de SKIFI- en de REPT-toets. 
Een kleine toelichting hierop: na A) of B) is het programma 
niet meer te hervatten. Bij C) en D) kan dit wel, namelijk door 
het commando *PCON” in te tikken. Het verschil tussen C) en DD 
is dat in het eerste geval het commando *PSTDP” in een bepaalds 
regeì van het programma neergezet dient te worden, terwijl in 
het tweede geval het programma op een willekeurig moment kan 
worden onderbroken (mits op dat moment de processor-stack leeg 
is). In heide gevallen wordt de gehele block-O RAM (van O tot 
#AFF) naar elders gecopieerd, evenals het gebied van 
#2800-#EBFF (de Floating-point variabelen en de adressen van 
P-Charme Functies en procedures), de status van de 
processor-registers en de 1/0 poorten C(#BOOC-#BOO2). Hiervoor 
is het gebied van #S9B00-#9FFF gekozen, Dit is echter 
gemakkelijk te veranderen Cin regel 200). De klok en de status 
van c@gisters en poorten worden opgeslagen binnen het gebied 
#230-#22F, Ook dit kan eventueel veranderd worden Cin de regels 
210-250). 
Nu blijkt ook het verschil met het "STOP"-statement van 
P-Charme: hierbij worden namelijk slechts de hoognodige 
gegevens opgeslagen, en kunnen tussentijds waarden van bv. 
variabelen worden gewijzigd. Na "FSIOP” af SHIFI-REPT kan dit 
weliswaar eveneens, maar dit heeft geen effect: hij hervatting 
van het programma (met "PCON”) worden de opgeslagen waarden 
weer teruggeschreven! 
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Er zijn enige condities op het gecombineerde gebruik van de 3 
commando's "TIME", "PSTOP” en ”PCON”: 
C} en D} zullen alleen goed werken als de interrupt-routine 
actief is, Er verschijnt dan de boodschap "ESCAPE AT LINE XX” 
op het scherm. 
Is de routine nog niet ingeschakeld met “TIME") of atwser 
uitgeschakeld (bv. door een andere interrupt-routine), dan zal 
D in het geheel niet werken. Bij C) zal het ”PSIOP”-statement 
den geinterpreteerd worden als het ”STOP”-statement van 
P-Charme: er klinkt een piepje, en de melding ”SIDP AT LINE XX" 
wordt geprint. Het programma kan nu nog uitsluitend worden 
hervat met “CONI”, want de interrupt-routins is immers niet 
actief. Wilt U dit niet, dan kan er op vrij eenvoudige wijze 
voor gezorgd worden dat in dit geval het "”PSTOP”-commando 
geheel wordt genegeerd, wat inhoudt dat het programma niet 
wordt onderbroken. Verander daartoe regel 1830 in: "JMP BASIC”, 
Dan nog enige condities bij ”PCON”: 
het programma kan alleen in de gevallen C) en D) worden hervat, 
en dan nog uitsluitend als: 
a. op het moment van onderbreken de intercupt-routine actief 
was, d.w.z, na de melding "ESCAPE", 
b. het programma niet tussentijds wordt veranderd. 


Ik heb zalf geen disk-drive, en kon daarom niet onderzoeken hoe 
de routine zich gedraagt tijdens een NMI, d.w.z. een interrupt 
met een hogere prioriteit, veroorzaakt door de controller van 
de disk-drive bij lees- of schrijf-acties. Mijn advies is: 
vermijd DOS-opdrachten zolang de routine actief is. 
COS-opdrachten vormen in principe geen probleem. Aileen zal de 
klak dan tijdelijk worden uitgeschakeld, waardoor de tijdmeting 
onjuist wordt. Vandaar het advies: eveneens vermijden. 

De statements zijn vooral ontworpen als utilities voor 
toepassing in bv. langdurige rekenprogramma’s, of in de 
ontwerp-fase van een programma. Voordeel is daarbij dat de klak 
bij onderbreking wordt stilgezet, waardoor de tijdmeting over 
het hele programma genomen toch tamelijk correct blijft. 
Bovendien kan de klok werden toegepast in spelletjes. 

De mogelijkheden gaan echter nog verder, want doordat bij 
onderbreking het volledige ‘werkgeheugen’ elders wordt 
opgeslagen, kan deze routine de aanzet vormen tat... 
multi-programming! Dus, mocht U zich geroepen voelen daar eens 
een leuk programmaatje voor te schrijven... 


Tot slot: er zitten vrij veel beveiligingen met bijbehorende 
fFautmeldingen in de routine: daardoor is hij ook zo lang 
geworden. 

Mochten zich onverhoopt toch nog problemen voordoen, laat het 
me dan even weten, 


Veel piezier ermee! 
Joop Engels, 


Prof „Bromstraat 102-11, 
65c5 BH Nijmegen. 
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10 PROGRAM TIJD-STOF 
zo 

30 D=256 

40 

50 FRINT $21;GOSUB a 
40 PRINT #06;GOSUB a 
70 
80 T= T+LEN(T) 4275 BEGIN/D; #80; TP1=BEGINZD 

















So È TOPAD; 
100 hed T= T+LEN(T) 3 ?T= CONTINUE/D; #80: T?1=CONT INUEXD4 T=T+2 
110 7PT=#80;A=P; T! ief 
120 
150 END 
140 
150al 
160 
170 .TA #9B00 
186 „BA A 
190 
200: BLK HOE 
210:0FFSET #250 
DKBLK+OFFSET 
OFFSET +#A 
OFFSET+#R 
2501 CLOCK DEFFSET+#C 
260 
270: STOP’ PCH = #ABES 
280 
20 hd = #05 
#06 
#OD 
#100 
101 
#204 
#205 
#2800 
#BOOO 
0: PORT’ B #BOO1 
290: PORT” € #ROO2 
400: VIA" T1C’L #ESO4 
#BBOS 
#EBOE 
HBBOD 
4 #BBOE 
450: STAT’ END #C4EA 
460: BASIC = #CESR 
: INTERFE = #CPEZ 
zPR TEXT = #F7D1 


BEGIN 

JSR STAT' END 
JSR EXEC” MODE 
LDA BASIC’ TOF 
STA SAV" TOF 
LDX @#07 

LDA @#00 

Or: SET 

STA CLOCH, X 
DEX 
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400 
&1L0 
&20 
zo 
640: 
450 
6bù 
670 
£BG 
&rn 
700 
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BFL SET 
JSR TIMER" START 
JMP BASIC 


TIMER’ START 

SEI 

LDA BINTERRUFTXD 
STA IROVEC'L 

LDA @INTERRUPT/D 
STA IRQVEC'H 

LDA B#40 

STA VIA" AUX 

ASL A 

STA DXBLE+RUN’ CB 
LDA @#CO 

STA VIA" IER 

LDA @10000%D 

STA VIA" TIEL 
LDA @210000/D 

STA VIA T1C'H 
CLI 

RTS 


: DTHER* INTERRUPT 


JSR PR TEXT 

„AS "INTERRUPT" 
NOP 

ERK 


z INTERRUPT 


LDA VIA" IFR 

STA VIA’ IFR 

ASL. A 

BPL OTHER" INTERRUPT 


INC CLOCE 
BNE TEST 
INC CLOCH+i 
BNE TEST 
INE CLOCR+2 
ENE TEST 
INC CLOCK+E 


TSX 
CPX @#FA 
BEG SHIFT'REPT 


: SEARCH 


INX 

ENX 

BPL QUIT 

LDA STACK'L,X 
CMP BDA 

BNE SEARCH 
LDA STACH'H‚X 
CHF BHCE 

BNE SEARCH 
JSF SET: INT 
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1200 BNE QUIT 

1210 

12205 SHIFT" REPT 
1230 BIT PORT'B 
1240 BMI QUIT 

1250 BIT PORT"C 
1260 BVS GUIT 

1270 TYA 

1280 PHA 

1290 JSR SET" INT 
1500 JSR COPY 

1310 STX DXBLK+RUN" CB 
SAV" STATUS 

FLA 

STA VECTOR, X 
INX 

CPX @HOG 

BNE SAV" STATUS 


PROG” STOP 

LDX #02 

SAV" FORTS 

LDA FORT, X 

STA VECTOR+&, X 
DEX 

BPL S5AV' PORTS 
TXS 

JSR PR° TEXT 
‚BY #06 

„DR #OAOD 

„AS "ESCAPE AT" 
STY BASIC'L 
LDA B#CA 

JMP INTERPR 


1550: GUIT 

1560 PLA 

1570 TAX 

1580 PLA 

1590 RTI 

1400 

1610: STOP 

14620 JSK STAT’ END 
1620 JSR EXEC’ MODE 
1640 PHP 

1650 PLA 

1640 AND 2#04 

1670 BNE PCH" STOP 
1680 BIT VIA" IER 
1690 BVC FCH’ STOP 
1790 LDA IRQVEC"L 
1710 CMP BINTERRUPTAD 
1720 BENE FCH’ STOF 
1750 LDA IRGVEC'H 
1740 CMP @INTERRUPFT/D 
1750 ENE FCH’ STOP 
1760 

1770 JSK SET’ INT 
1780 STA RIJN'CE 
2700 JSR COPY 
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1809 BEG PROG’ STOP 
1810 

1820: FCH’ STOP 

1830 JMP STOP’ PCH 
1840 

1850: SET’ INT 

1860 SEI 

1870 LDA @#40 

1880 STA VIA' IER 
1890 RTS 

1900 

1910: COPY 

1920 LDX @#00 

1920: STORE 

1940 LDA #OO,X 

1950 STA D&(BLK+O) „X 
1960 LDA #HOO,X 

1970 STA DX(BLK+ID „X 
1980 LDA #200,X 

1990 STA DX(BLK+2) ,X 
2000 LDA #200,X 

2010 STA DELBLK+Z) „X 
2020 LDA VAR, X 

2030 STA DX(BLK+4) ,X 
2040 INX 

2050 BNE STORE 

2060 RTS 

2070 

2080: EXEC" MODE 

2090 LDA BASIC’H 
2100 CMF B#O1 

2110 BEG ILLEGAL" DIRECT 
2120 RTS 

2120: ILLEGAL" DIRECT 
2140 JSR PR°TEXT 
2150 .AS "ILLEGAL DIRECT" 
2160 NOF 

2170 BRK 

2180 

2190: DIRECT" MODE 
2200 LDA BASIC'H 
2210 CMF B#O1 

z BNE ONLY” DIRECT 
) RTS 

zONLY" DIRECT 

) JSE PR TEXT 
2260 .BY #06 

2276 „DE #0AOD 

2280 .AS "ONLY DIRECT!" 
2290 NOP 







2 
2 
2 


CAN’ T 

JSR PR TEXT 

34 „AS "CANT CONTINUE" 
50 MOF 








CONTINUE 
JSR STAT‘SEND 


EJ kJ HJ RI BJ Hd DI MJ PJ He 
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2400 
2410 
2420 
2450 
2440 
2450 
2440 
2470: 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2566 
2570 
2580 
2590 
2600 
2610 
2620: 
2630 
2640 
2680 
2660 
2670 
2680 
2690 
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JSR DIRECT’ MODE 
LDA BASIC’ TOP 
CMP_DKBLK+SAV” TOP 
BNE CAN" T 

BIT DXELK+RUN CB 
BMI CAN? T 

LDX #00 

BACK 

LDA D&(BLK+O) ,X 
STA #90, X 

LDA D&(BLK+1),X 
STA #100,X 

LDA D*(BLK+2) „X 
STA #200,X 

LDA DK CBLK+5) X 
STA #200,X 

LDA D&(BLK+4) ‚Xx 
STA VAR, X 

INX 

BNE BACK 


LDX B#02 
RESET 

LDA VECTOR+&, X 
STA PORT, X 

DEX 

BPL RESET 

TXS 

JSR TIMER: START 
BIT RUN’ CE 

BVC GO’ ON 

JMF BASIC 


GO ON 


LDY VECTOR 
LDX VECTOR+L 
LDA VECTOR+E 
FHA 

LDA VECTOF+2 
FLP 

JME (VECTOF+4) 


SETURN 
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Opzet. 


De duovia kaart werd ontworpen om met behulp van twee 6522 de 1/0 mogelijk- 
heden van de Acorn-Atom te vergroten. 

Het is inderdaad zo dat de interne Via op het moederbord meestal reeds în 
gebruik ís voor de printer. 

De beide extra VIA's op de kaart kunnen hun basisadres hebben in het gebied 
BCOO tot BFFO en deze adressen worden vol-gedecodeerd zodat geen bijkomende 
adressen verloren gaan.(Wat nu met de originele VIA op B800 wêl is.) 


Om de kaart nog universeler te maken bestaat de mogelijkheid om dit adres- 
gebied te verleggen ofwel naar BOO0 tot B3FO, ofwel B400 tot B7FO, danwel 
B800 tot BBFO. Dit kan door enkele banen door te krassen en de adreslijnen 
AlO en/of All al of niet te inverteren. 

MAAR: OPGELET: de originele ATOM gebruikt deze gebieden geheel (door de on- 
volledige decodering). Daar moet men dus &érst iets aan doen voor men deze 
gebieden gaat gebruiken. 


De Duovia kaart wordt met een 64 pin,‚a-b Eurokonnektor aangesloten op de 
*standaard" ATOM-bus. Let erwel op dat de nummers dan niet Kloppen: het nr 1 
op de konnektor wordt het nr.32 van de ATOM. 


Omdat echter vele ATOM gebruikers overgestapt zijn op de Elektuur bus werd de 
plaatsing van een 64 pin a-c konnektor voor de Elektuurbus ingepland; echter 
moeten dan een aantal banen doorgekrast en nieuwe (draar) verbindingen ge- 
legd worden. Zie hiervoor de extra toelichting. 


De uitgangskonnektoren kunnen per poort afzonderlijk gehouden worden door ze 
om en om te plaatsen; ze kunnen ook per VIA bijeen gehouden worden op een 

26 pin header; men kan ook rechtsreeks aansluiten of andere mogelijkheden 
bedenken. 


Er is ook voorzien dat de de VIAkaart aangesloten kan worden met plug 8. 

Dat is wel verbonden aan beperkingen: Alléén de VIA onder plug 8 aansluiting 
mag dan geplaatst worden en de kaart mag dan niet op de bus. Zijn dan ook 
overbodig de bus-buffers en de decodeerschakeling. Het opent wel de mogelijk- 
heid om de kaart te gebruiken zonder dat men over een rack (met bus) beschikt. 


Bouw, 


Bestaat in het plaatsen en vastsolderen van de IC voetjes.Uiteraard langs de 
componentenzijde. Soldeer zéêr spaarzaam!!! 


De ontkoppelC's zijn niet erg kritisch: 50 à 100 nF. 


Van konnektor aansluiting a27 en a28 komen twee sporen die bijelkaar aansluiten: 
Wie de ATOM bus gebruikt moet spoor a28 doorkrassen; de Elektuur-bus gebruikers 
moeten het spoor van a27 doorkrassen! (De nummers zijn die van de konnektor en 
niet die van de kaart want dat zijn de ATOM nrs.) 


Aansluitkonnektors: Wie de ATOM bus gebruikt moet de 2 (of drie) rijige konnek- 
tor plaatsen aan de zijde van de komponenten: de nummers op de kaart komen dan 
niet overeen met de nrs op de konnektor: 32 is 1 en 1 is 32! Tip: soldeer alléén 
die pinnen vast die een signaal dragen: dat ís de hêle a kant en 1 pin op de 
b-kant. 
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Wie echter de Elektuur-bus gebruikt moet de konnektor (în dít geval een a-c type) 
plaatsen aan de tegenovergelegen kant van de komponenten; de nrs van de kaart 
zullen nu overeenstemmen met de nrs van de konnektor. 

Zoals reeds ín de aanhef gezegd moet er nu gekrast worden: 

Doe dit zorgvuldig en op de plaatsen aangegeven op de bijgaande tekening. 

Daarna moeten de goede verbindingen gelegd worden: op de tekening staan bij elk 
eilandje de aanduidingen die dít moeten makkelijk maken. 


Decodering. 


De decodering gebeurt in twee stappen: de eerste '138 verdeelt het gebied van 
BCOO tot BFFO în 8 gelijke stukken; daarvan kiest men met de draadverbinding 
één gebied waarbinnen de beide VIA's geadresseerd worden. 

De twede 138 verdeelt het gekozen gebied in 8 blokken van 16 adressen: met de 
dubbele draadverbinding kan men nu voor elke VIA een blok vastleggen. 

De bovenste draadverbinding fs voor de linkse VIA, de onderste voor de rechtse. 
Men kan deze verbindingen Îneens vastsolderen: dan liggen de adressen ook "vast" 
Men kan ze ook maken met een steekverbinding: dan kan men ten allen tijde nog 
eens veranderen. 

Mie het basis gebied BCOO tot BFFO wil veranderen moet daartoe adreslíjnen AlO 
en All al of niet inverteren volgens bijgaande tabel, en dat kan door gebruik 
te maken van de twee resterende inverters în IC LS14 : soldeereïlandjes werden 
daartoe aangebracht. Lees echter wel de opmerking hiervoor. 


Gebruik, 


Dat houdt de echte uitdaging fn! Alles wat men wil In of Out-putten anders dan van 
toetsenbord of scherm of printer, kan:BVB: 1fchtorgel, meetinstrumenten, Centr, 
verwarming etc.Wie schrijft de source voor statements die dan rechtsreeks de VIA 
gaan "aanspreken"? En díe in een ROM kunnen gestopt worden? 


Tabel 1: Decodering. 


Punt A geeft voor beide VIA's Punt B (voor VIA 1) geeft volgend 

aan: volgend adresgebied Punt C (voor VIA 2) basísadres 

1 BCOO tot BC70 1 BCOO 
2 BC10 
3 BC20 
4 BC30 
5 BC40 
6 BC50 
7 BC60 
8 BC70 

2 BCBO tot BCFO 1 8C80 
2 BC90 
3 BCAO 
4 BCBO 
5 BCCO 
6 BCDO 
7 BCEO 
8 BCFO 

3 8000 tot BD70 etc etc 

4 BD80 tot BDFO 

5 BEOO tot BE7O zelfde indeling en selektie als 

6 BE80 tot BEFO voor gebieden BCOO tot BCFO 

1 BFOO tot BF70 

8 BE30 tot BFFO 
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Tabel 2: Ander gebied în 8-blok, ín plaats van BCxx 





WIl men B8xx: dan moet A10 geïnverteerd worden: 


kras het spoor tussen de eilandjes AlO en A10 door;5deze tiggen 
tussen 245/1 en 138/1 


Verbind dan het bovenste eilandje met ín.l en het onderste met out 1 


Wil men Bäxx: Dan moet All geinverteerd worden. Doe als hierboven, maar nu met de 
eilandjes All, 


Wil men BOxx: Dan moet zowel AlO als All geïnverteerd worden: doe als hiervoor en 
gebruik zowel fn en out 1 als în en Out 2, 


Komponentenopstelláng: 











ACB. 
DUD-VlA 


6522/ 1 6522 / 2 











JJ. LERNOUT 


PUG IA 


PAG. 16 ATOM NIEUWS 


DUOVIA 


Atom-Bus 
Elektuurbus 


:nummers zijn deze van de kaart! 





1,2,3,4= LS00 7,8,9,10,5,6sL514 
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Waarschijntijk krijgt elke Atom-bezitter vroeger of later te 
maken met het volgende probleem: Atom Basic is, hoewel snel, 
zeer afwijkend van het meest gangbare Basic dialsct, Microsoft 
Basic, met name in het gebruik van variabelen en de 
string=manipulatie. Op zich is dit probleem niet zo ernstig, en 
bovendien heeft de introductie van P-Charme vele tekortkomingen 
verholpen. Er ontstaan echter moeilijkheden zo gauw men 
programma’s geschreven voor anders merken computers wil gaan 
gebruiken: de benodigde bewerkingen zijn vaak ze omvangrijk dat 
een en ander ondoenlijk wordt. 

Sinds 1981 heeft het NOS-programma Hobbuyscoop gepoogd om wat 
meer eenheid te brengen in de wirwar van Basic dialecten, 
allereerst door introductie van het zogenaamde 
Basicode-protocol, waardoor geen der belangrijkste hinderpalen 
voor communicatie tussen verschillende merken computers werd 
weggenomen: er werd gen standaard gedefinieerd voor de wijze 
waarop een programma met behulp van verschillende toontjes op 
cassette dient te worden opgeslagen en vandaar weer kan worden 
ingelezen, want elk merk computer doet dit op een andere 
manier! Ook voor de Atom werd al vroeg een dergelijk 
'vertaalprogramma’ van en naar Basicode geschreven door Arie 
Marchal: zie bv. de 'KHOBBIT’ van januari 1982. 

Teen echter aldus een computer van merk X de mogelijkheid had 
gekregen om een programma geschreven op een computer van merk Y 
in te lezen, kwamen de onderlinge verschillen in de Basic 
dialecten pas goed aan het licht. Om bv. het scherm schoon te 
maken, diende je op de ene computer 'HOME' in te tikken, op een 
andere 'ELS’, op weer gen andere 'PRINT CHR$SC1H7)’ enz. Verder 
waren er diverse Basic statements die het ene merk wel kende en 
het andere niet, bv. 'PROC’ en 'FUNCTION' in BBC-Basic. Om ook 
deze tweede hindernis te kunnen nemen, werd een nieuw protocol 
antwikkeld (Basicode-II), waarin enerzijds de Basic werd 
beperkt tot een nauwkeurig omschreven subset van de meest 
gangbare statements, anderzijds de belangrijkste afwijkingen 
werden ondervangen door een standaard programma-opbouw voor te 
schrijven. In deze opbouw begint het eigenlijke programma pas 
vanaf regel 1000, Dit is voor alle merken computers identiek. 
In de regels 0-999 daarentegen staan, op een vaste plaats en 
met een nauwkeurig omschreven betekenis en syntaxis, bepaalde 
standaard-routines die voor elk type verschillend zijn (maar 
hetzelfde doen): de Basicode-II subroutines, die vanuit het 
hoofdprogramma kunnen worden aangeroepen. Zie voor nadere 
uitleg bv. A‚N. 2,4, p.58. 


De introductie van het Basicode-II protocol heeft voor de 
meeste typen computers de belangrijkste communicatie-obstakels 
vit de weg geruimd. Voor de Atom echter niet, omdat de 
afwijkingen in de Basic te groot zijn. 

Natuurlijk is het mogelijk om Basicode-programmatuur naar 
Atom Basic om te schrijven, en zelf heb ik dat cok een tijd 
lang gedaan: zie bhv. het oude archief-bandje nr.t0 CAN. 1.8, 
p.54). Dit proces is echter veel te bewerkelijk en tijdrovend. 

Een mogelijk alternatief wordt geboden door de implementatie 
van BBC-Basic op de Atom, al dan niet door toepassing van een 
BBC-kaartje, en sinds het begin van ons club-bestaan is daaraan 
den ook aandacht besteed (bv. in A.N. 1.8, p.63). 
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Sinds 1984 mag BBC-Basic zich in een groeiende belangstelling 
verheugen binnen de club, en met name Ronald Boers heeft op dit 
terrain veel werk verzet. Een van zijn belangrijkste bijdragen 
is de introductie van een sterk verbeterde versie van de 
MOS-ROM geweest (zie A.N. 4.5, pp.8-18), die ik eenieder die 
met BBC-Basic werkt van harte kan aanbevelen, 


Den nu de eigenlijke programma's: dit zijn er een drietal, te 
weten sen 1200 Baud-routine, een Basicode-II leesprogramma en 
een Basicode-II schrijfprogramma. 

Over het eerste kan ik kort zijn: dit ís alleen nodig voor 
diegenen die nog niet over de MOS-ROM U3,0 van Ronald Boers 
beschikken, want daar zit is al in! 

Ket Basicade-1! Ieesprogcamma is in feite een compromis 
geworden tussen de Atom enerzijds en Basicade anderzijds, Zelf 
heb ík in de BBC-mode siechts geheugen van &800-82000, zodat 
alleen kleine programma’s zijn in te lezen, en bovendien het 
vertaalprogremma niet te groot mocht worden, Vandaar dan ook 
twee aparte programma's voor lezen en schrijven. 

Progcamma’s in Besicode worden min of meer als ASCIl-files 
overgezonden, wat inhoudt dat alle Basic statements voluit 
worden gespeld en ook de regelnummers (decimaal) cijfer na 
cijfer worden overgestuurd. Hierdoor valt, ondanks de beperkte 
geheugenruimte, nog wat winst te boeken wat de maximale lengte 
der in te lezen programma's betreft. 

Het mooiste zou het dan ook zijn om de ingelezen regels 
direct te kunnen omzetten naar BBC-Basic: dit betekent bv. voor 
de Electron dat, hoewel de beschikbare geheugenruimte slechts 
19K bedraagt, Basicode-II programma’s tot een lengte van ca. 
eSK bytes kunnen worden ingelezen! 

Aanvankelijk heb ik geprobeerd om, net als bij de Electron en 
de BBC-computer, de data onder interrupt in te lezen, want dat 
is de enige manier om de gegevens 'tegelijk’ te kunnen inlezen 
en interpreteren. Bij de BBC en de Electron wordt dit karweitje 
door de 1/O-hardware opgeknapt (bij de Electron is dit de ULA), 
waarbij na het inlezen van een volledig byte een interrupt 
wordt gegenereerd. Bij de Atom moet dit echter door de 
processor zelf gedaan worden, en wel hit na bit, wat zolang 
duurt dat er niet voldoende tijd meer overblijft om de 
ingelezen regel ook nog te kunnen interpreteren, zelfs niet 
wanneer de data tijdelijk in een buffer worden opgeslagen. 

Er bleef dus niets anders over dan eerst alle data in te 
lezen Ctot het geheugen vol is), en ze daarna regel voor regel 
aan de Basic-interpreter aan te bieden, wat dit leesprogramma 
dan ook doet. 


Ket leesprogramma wordt, na assemblage, vlak onder HIMEN 
gezet, inclusief de Basicode-II subroutines. Het geheel neemt 
IX bytes in beslag. 

Na opstart van het programma krijgt U de beschikking over 3 
opties, te kiezen door een 'CALL' naar machinecode (bij de BBC 
en Electron kan dit veel eleganter, namelijk m.b.v. 
Functietoetsen. .…). 

Bij de eerste twee opties wacht het programma met inlezen 
totdat het start-teken waarmee elk Basicode-programma begint 
C'STX’, code &82) op de hand ts ontdekt. Bij de derde optie kan 
het inlezen ook midden in een programma beginnnen, Hierop kom 
ik later nog terug. 
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Het verschil tussen de eerste 2 opties is dat bij de eerste 
ook nog de Basicode-subroutines naar beneden, d.w.z, het begin 
van PAGE, worden gecopieerd, waardoor het actuele programma 
wordt overschreven, en er dus ook geen 'NEW’ instructie hoeft 
te worden gegeven. 

Bij de tweede en derde optie kan dit eventueel wel nodig 
zijn, want de in te lezen regels worden alleen aan het actuele 
programma toegevoegd, waardoor esn mogelijkheid ontstaat tot 
het samenvoegen of ‘mergen’ van 2 of meer programma’s, 

Bij de derde optie kan deze mogelijkheid worden benut om een 
programma stukje bíj beetje in te lezen: U begint met inlezen 
mat bshulp van de eerste of tweede optie, stopt de band wanneer 
de melding "geheugen vol” verschijnt, wacht totdat de routine 
klaar is met interpreteren (en er dus weer wat geheugen is 
vrijgekomen), spoelt de band geen eindje terug, vervolgt het 
inlezen met de derde optie, en gaat hiermee net zolang door 
totdat ofwel het hele programma is ingelezen ofwel het geheugen 
echt helemaal vol is! Eventusel kunt U nog tussentijds het 
programma inkorten, bv. door het verwijderen van REM-regels. 

Na het aanroepen van een optie wordt de HKIMEH-pointer tot 
onder de subroutines en de machinecode verplaatst. Dit biedt 
echter uitsluitend een beveiliging tijdens het inlezen: na een 
’BREAK’ wordt deze pointer weer op zijn normale waarde gezet, 
waardoor de inlees-routine beschadigd kan worden, Hiervoor 
dient U dus zelf waakzaam te zijn. 

Het verloop van de inlees-procedure is als volgt: na aanroep 
van een optie verschijnt de melding "ik zoek,..”. Zet nu de 
cassette met het in te lezen Basicaode-programms klaar en start 
de band. Wanneer de aanlooptoon Cheader) van een programma 
wordt ontdekt, verschijnt de melding "header gevonden”, waarna 
het inlezen kan beginnen. Als het goed is, ziet WU nu in de 
rechter bovenhoek van het scherm de ingelezen bytes 
vaorbijflitsen. Wanneer het programma klaar is met inlezen, 
verschijnen er achter elkaar een aantal prompts ‘>’ op het 
scherm, ten teken dat de computer bezig is met interpreteren. 
Hierbij kunnen ook Foutmeldingen verschijnen, bv. wanneer de 
geluidskwaliteit erg slecht was en er veel Foutieve bytes zijn 
ingelezen. Tenslotte zal de interpreter weer terugkeren naar de 
input-made: er verschijnt een prompt vooraan een nieuwe regel. 
Vlak voordat dit gebeurt, kan eventueel ook nog de melding 
“checksum Fout” verschijnen, wanneer de checksum van het 
ingelezen programma niet klopte, U kunt nu het programma 
bekijken en, als alles goed is gegaan, starten met 'RUN', 

Nog een opmerking hierbij: normaal zullen in een 
Basicude-programma zowel hoofd- als kleine letters voorkomen, 
De originele MOS-ROM zal echter alles omzetten naar 
hoofdletters. MOS-ROM V3.0 biedt de mogelijkheid om de kleine 
letters intact te laten, d.w.z. Cop het normale 32/15 scherm) 
als geinverteerde karakters weer te geven: maak hiertoe de 
inhoud van ZP-byte &EB gelijk aan nul. 

Tegelijk raak ik hiermee aan een ander probleem dat zich in 
combinatie met Basicode voordoet: er wordt namelijk standaard 
uitgegaan van een beeldscherm van 24 regels met elk 40 tekens, 
hoewel niet alle merken computers hierover beschikken. Slechts 
weinig programma’s passen zich automatisch aan de afmetingen 
van het beeldscherm aan (bv. de Basicode Beeldkrant). Het valt 
dan ook aen te bevelen om een 24/40 UOU-routine in BBC-mode te 
implementeren, Binnen de MOS-ROM V3,0 zijn hiervoor reeds de 
nadige voorzieningen getroffen (zie A.N. 4.5, pp.14-17). 
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Tot slot nog iets over het inlees-programma zeif: er is 
minimaal geheugen in het gebied van &800-82000 nodig. 

In de praktijk is dit echter niet werkbaar, en een volledig 
uitgebreid geheugen Ctot 84000) wordt dan ook noodzakelijk 
geacht. 

De Basicode-11 subroutines werden oorspronkelijk geschreven 
door Ir. P.6.M. Maathuis uit Berkel voor de BBC-computer, en 
zijn integraal overgenomen. Mensen dia nog met de oude MOS-RON 
werken dienen echter regel 120 te veranderen, want. daarin zijn 
de statements ’POS' en 'UPOS’ niet opgenomen. Deze regel wordt 
dan bv.: 


120 HO=PREO:VE=CC!&DE AND &FFFF)-84000) DIV 32: RETURN 


De Basicode lees-coutines tenslotte zijn oorspronkelijk 
geschreven door Arie Marchal. Ze werden licht aangepast aan de 
BBC-mode. 


Tot zover het leesprogramma, Over het schrijfprogramma valt 
(gelukkig!) minder te vertellen. De gevolgde procedure komt in 
grote lijnen overeen met die van Ir. Maathuis in het 
schrijfprogramma voor de BBC-computer. 

Om de Besic-keywords te omzeilen, wordt gebruik gemaakt van 
het LISI-commando, waardoor alle tekens naar ASCII worden 
omgezet. Dit gebeurt door de OSWORD-vector af te vangen, waarna 
de geproduceerde karakters via de eveneens gewijzigde 
OSWRCK-vector naar de cassette-uitgang worden gestuurd, waarbij 
ze tussentijds alieen weer in de rechter bovenhoek van het 
scherm te zien zijn. 

Alvorens een regel weg te schrijven, zorgt het programma er 
nag voor dat achter elk regelnummer 1 spatie komt te staan. 

Wanneer de schrijfroutine wordt aangeroepen, wordt het 
programma dat vanaf PAGE in het geheugen staat naar cassette 
gestuurd. Ket programma wordt daarbij niet beschadigd of 
vernietigd, dit in tegenstelling tot de Atom-schrijfroutine van 
Arie Marchal. 

Bij het schrijven naar cassette zijn er twee opties: ofwel 
het hele programma wordt weggeschreven, ofwel alleen de 
progreammaregels vanaf regel 1000, zoals in het Basicode-Il 
protocol wordt geeist, De keuze kunt U maken door in de 
’residente’ variabele C% de waarde O of 1 te zetten, Roep 
daarna de procedure aan via het opgegeven startadres. 

Er verschijnt vervolgens de melding »record then return”, 
waarna U de cassetterecorder 'scherp' kunt zetten voor opname, 
Door op de 'RETURN'-toets te drukken, wordt het wegschrijven 
gestart. Ook nu weer ken dit uitsluitend onderbroken worden met 
de 'BREAK’-toets. Wanneer alles is overgeseind, verschijnt de 
melding 'program saved’, en komt U weer in input-mode terecht. 

Nog een laatste opmerking: evenals de Ieesroutine wordt het 
schrijfprogramma direct onder HIMEM gezet, waarna de 
MIMEM-pointer wordt verplaatst. Hier geldt eveneens dat U na 
een 'BREAK’ zelf ervoor dient te waken dat de routine niat 
wordt beschadigd of overschreven. 

Tevens betekent dit, helaas, dat de lees- en de 
schrijfroutine op hetzelfde geheugengebied staan geadresseerd, 
zodat ze niet tegelijk te gebruiken zijn. Dit komt met name 
voort uit het feit dat in mijn Atom de geheugenruimte ontbreekt 
om een samengestelde lees/schrijfroutine te maken. 

Wie voelt zich geroepen...7 
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Aan beide programma’s kan zeker nog worden gesleuteld: zo 
ontbreekt een 'ESCAPE’-voorziening, en wordt er niet getest of 
de ingelezen dan wel weggeschreven programma’s voldoen aan het 
Basicade-II protocol (hiervoor verwijs ik naar: NOS-Hobbyscoop, 
Postbus 1200, 1200 BE Hilversum). 

Bovendien kunnen deze programma’s niet voorzien in enkele 
nijpende 'Fysische’ tekortkomingen van de Atom, zoals gebrek 
aan geheugenruimte in de BBC-mode en afwezigheid van een 24/40 
VDU. 

Niettemin maakt BBC-Basic, in combinatie met Basicode, de weg 
vrij voor de Atom om te communiceren met andere merken 
computers, en krijgt U er tevens een aanzienlijke hoeveelheid 
programmatuur bij, wat tot nu toe alleen voor de gelukkige 
bezitters van een BBC of Electron was weggelegd. 

Vaar vragen, op- of aanmerkingen houd ik me verder van harte 
aanbevolen. Veel ‘'ratelgenot’ toegewenst! 


Joop Engels, 
Prof .Bromstraat 102-11, 
6525 BH Nijmegen. 


P.S. 


1) B5C-Basic voldoet geheel aan de Basicode-Il standaard, op 
een kleine uitzondering ra, veroorzaakt door het Feit dat 
BBC-Basic krachtiger is dan Microsoft Basic: Basicode-il kent 
namelijk alleen de natuurlijke logaritme (met grondtal ee), 
aangeduid met de Functie 'LOG’. In BBC-Basic echter geeft 'LOG’ 
juist de gewone of Briggse logaritme weer (grondtal 10), 
terwijl de natuurlijke logaritme wordt aangeduid met ‘LN’. 
Concreet betekent dit dat U in ingelezen Basicode-programma’s 
alle 'LO6's in 'LN's zult moeten veranderen, en dat U alvorens 
een Basicode-programma op hand te zetten het omgekeerde moet 
doen, De betreffende Functie wordt echter zo weinig gebruikt 
dat U dit in de praktijk vrijwel nooit zult hoeven te doen. 


2) De uitzendtijden van Hobbyscoop zijn op dit moment: 
—= 's woensdags van 18.00-19.30 uur op Radio t en 2 CFM) 
= ’'s donderdags van 17.30-17.45 uur op Radio 5 
CAM, 1008 Khz, Lopik) 





PAL. 2e ATOM NIEUWS BBC+BRSICODE IT J.ENGELS 


1ORENM 1200 BAUD ROUTINES 

B2OREM VOOR DE ACORN ATOM 

3OREM MET BBC-KAARTJE . 

HOCLS : B5=Q 

SOINPUT"WAAR CODE OPSLAAN ”,‚QS:D%=EVALOS 
GOFOR Ix=0 TO 3 STEP @ 

7OPx=Gk:COPT 1%:5E1 

BOLDA #LEES MOD 256:STA &215 

SOLDA #LEES DIV 256:STA &217 

100LDA #SCHRIJF MOD 256:STA &21B8 
120LDA #SCHRIJF DIV 256:STA 4219 
120CLI:RTS 

130\BGET 1200 BAUD 

140.LEES:SIX &EC:SIY &C3:PHP:SEI 
150.Li:LDA #&7E:STA &CO 

150.LP:JSR &FCS2: BCC L1 

170INC &CO:BPL L2 

180.L3:CLC: ‚L4: PHP 

190JSR &FCI2: JSR BFCSH:CPX #R12:BCS LS 
200PLP:BCS L6:SEC:BCS L4 
210.L5:PLP:.L5:ROR &CO:BCC 13 

220LDA 8CO:STA &HO1F: JMP &FBF1 
230\BPUT 1200 BAUD 

240.SCHRIJF:STX &EC:STY &CA: PHP: SEI 
250PHA:JSR BFBFEG:STA &CO:STA &401F 
250JSR &FCAD:LDY #&OA: CLC 

270.S1:BCC S2 

eBOLDX #&07:STX &7002:LDX #&01:BNE 53 
230.S2:LDA #&0U:STA B70O2: ISR BFCAD: INC &7002 
300.53: JSR &FCAF:SEC:ROR &CO:DEY:BNE S1 
310TSX:LDA &103,X:AND #8OF 

JEOEOR &1O4,X:CMP #&F1:BEG S4 

330JMP &FCSB 

340,54:LOX #BOU: STX 47002 
350PLA: PLP: PLA: PLA: RIS 

35OI:NEXT 1% 

37OPRINT'"CODE STAAT VAN &”;0%; "B"; “P%-1 
3BOPRINT’”START DE ROUTINE MET: " 
3IOPRINT*” CALL &”;“Q%;CHRSC1ID; 

HOOEND 
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10G0T01000 
208%=0: GOTO1010 
10OCLS: RETURN 
110PRINTTABCHO, VE) ; : RETURN 
120HO=POS: VE=UPOS : RETURN 
2OOINS=INKEYSCOD) : RETURN 
BIOINS=GETS: RETURN 
25OUDU7 : RETURN 
2BORV=eRNDC1 : RETURN 
27OFR=C 75-73) *E55+PU- PE: RETURN 
3OOSRE=STRECSR) : RETURN 
3102%*&1020000+CN*255+CT: D=ABSCSRI: IFOS.5*10"-CN SRS=STRECO) ELSESRS=STRSCSRO 
31180: IFCN=OSRS=LEFTSCSRS, LENCSRS) -1) 
SI2IFLENCSRS)>CT ORO>=10°CCT-CN) ORD>=1E9 SRE*STRINGECCT, ”*”): RETURN 
S13SRE=-STRINGSCCI-LENCSRS),"” ")+SR$ 
314RETURN 
350LDUE: PRINTSRS ; : VDU3: RETURN 
350 VOG 2:PRINT:UDU 3: RETURN 
1000 
1O1OREM BASICODE-II LEESPROGRAMMA VOOR DE ACORN ATOM MET BBC-KAARTJE 
1OEOREM VERSIE 1.8: 31-1-1386 
1030 
1O4OCLS : Ex=0 





%=PAGE: G%8700 
1OSOREPEAT L%=L%+1: UNTIL BSB*PLX+PCL%+12=1000: L4=L%-PAGE 
LOSOREPEAT G4=G%+8100:7G4=?G% EOR &FF: Hue ?G%: 7 
1O70UNTIL Hi=?Gx OR G%>=&4000 

1 OBOH%=G%-8400: D=256 

1080 

} LOOSTX=8O2: ETX=803: CR=8OD: SPATIE=ASC”" *; DPUNT=ASC”: ” 
111OLMEM=802 : KMEM=BOS : TP=&12: PAG=&18 

1 LEOMEM=B70: PAR=872: TXT=&74 : CSUM=&76: VLAG=77 

11 30WVEC=87C: VORDU=R20C 

1 LHORC=G4-5 ; RN=G%-H RH=GX-3: RT=G4-B: RUSGA-t 

1 LSOSCHERM=&401F : POORT 'C=87002 
1 LBOOSASCI=8FFE3: OSNEWL=&FFE7 
1170 

118OFOR I4=0 TO 3 STEP 2 
1130P%=Hx+8200:LOPT 1% 

1200 

1210.B2:JSR ZET'KIMEN 

1220JSR SUBR:BEQ ALLE 
1230.B1:JSR ZET ‘HIMEN 
L240SEC:BCS ALLE 

1250.B0:JSR ZET'HIMEM:CLC 
1250. ALLE: ROR VLAG 

1270LDA #AAN MOD D:JSR DRUKAF 
1280ISR INIT'MEM:JSR LAAD'PROG 
12S0LDA #UIT MOD D:JSR DRUKAF 
1200JSR INIT“MEN:JMP VERTAGL 
1310 

1320. ZET‘ HIMEN 2 maromenarbrmon tn 
1330LDA #H% MOD D:STA HMEN 
1380LDA #H% DIU D:STA KMEM+1:RTS 
1350 

1350. INIT “MEM 

1370LDA IP:STA MEM 

138OLDA TP+1:STA MEM+1:RTS 

1380 

1400 . LAAD ‘PROG 
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1H10SEI:JSR 20EK'START 
1420BIT VLAG:EPL LUS 
1430JSR WACHT 'OP'STX 
14840, LUS 

145OJSR LEES'BYTE:STA SCHERM 
1460JSR VERVANG 'CTRLS 
14#70JSR SLA'OP 

1480CMP #ETX:BNE LUS 
1430JSR LEES'BYTE 
1500CLI: RIS 

1510 

1520, ZOEK ‘START 

1530LDA #800:STA RC 
1540.START:JSR TRANS1 
15S5OCHP #817:BCC START 
1560INC RC: BNE START 
1570JSR TRANS1 

15B80ASL A:SBE #05:STA RN 
1530CMP #38:BCC START 
1500CMP #43:BCS START 
1510LDA #HEADER MOD D 
1620JMP DRUKAF 

1630 

1540, TRANS3 

1550JSR TRANS2: .TRANS2 
1550LDX #8&00:LDA POORT'C 
1570AND #&20:STA RT 
1680 . DUERGANG 

1530INX:LDA POORT'C:AND #820 
1700CMP RT:BEG OVERGANG 
1710TXA:ADC RU:STX RU:RTS 
1720 

1730.LEES'BYTE 

1740JSR TRANS2:EMP RN 
1750BCC LEES'BYTE:LDY #&08 
1760.NBIT:JSR TRANS2 
1770CMP RN:BCS BIT'O 
1780,BIT'1:JSR TRANS1 
1730S5EC:BCS ROTEER 
1800.BIT'O: CLC 
1810.ROTEER:ROR RH 
1B200EY:BNE NBIT:LOA RH 
1830PHA: EDR CSUM:STA CSUM: PLA 
184OAND #87F: RIS 

1850 

1860 .WACHT 'OP'STX 

1870JSR LEES'BYTE 

1880CMP #STX:BNE WACHT 'OP'STX 
18500RA #880:STA CSUM:RTIS 
1300 

1310.VERVANG'CTRLS 
1320CMP #SPAIIE:BCS OK 
1930CHP #CR:BEG OK 
194OCHP #ETX:BEQ Ok 
195OLDA #DPUNT: .OK: RTS 
1360 

1970.SLA'OP 

1980LDX #8&00:STA CMEM, XD 
1930 

2000, VERKCOOG 
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BO1OINC MEM:BNE TERUG: INC MEM+1 
2O2OLDX MEM+1:CPX HMEM+1 
20308CC TERUG: PLA: PLA 

2OHODEC MEM+1:LDA #CR:LDY #&FE 
2050.ZOEK'CR:DEY:CMP CMEM),Y:BNE ZOEK'CR 
2O05OINY:LDA #ETX:STA CMEM),Y 
2070LDA #VOL MOD D:IJSR DRUKAF 
20BOCLI: „TERUG: RTS 

2030 

2100 .VERTAAL 

@110LDA WORDU:STA WEC 
2120LDA WORDU+1: STA WVEC+1 
2130LDX #WOORDVEC MOD D 
2140LDY #WOORDVEC DIU D 
21SOSEI:STX WORDU:STY WORDU+I 
2160CLI:CLC: RIS 

2170 

2180,WOORDVEC: CMP #8400 
B1S0BEQ REGEL: JMP CWUEC) 
2200,REGEL:ROR A:STA VLAG 
2e10SIX PAR:STY PAR+1 

E22OLDY #RO1:LDA CPAR),Y: TAX 
2230DEY:LDA CPAR),Y 

2240STA PAR:STX PAR+1 

2es0 . 
2250.LEES'KAR;JSR HAAL 'KAR 
2270CMP #EIX:BEQ EINDE 
22B0CMP #SPATIE:BNE OK1 
2230BIT VLAG: BPL OK2 

B230OROR VLAG: BMI LEES'KAR 
2310.0K1:BIT VLAG:BPL OK2 
2320BUC OKE:LOX #800:STX VLAG 
2330.0K2:STA CPAR),Y: INY 
234OCMP #CR:BNE LEES 'KAR 
23ISOCLC: RTS 

2360 

2370,EINDE 

2380JSR OSNEUL 

2330LDA CSUM:BEU HERSTEL 'WORDU 
2400LDA #SUM MOD D:JSR DRUKAF 
2410 

2420 „HERSTEL 'WORDU: SEI 
2430LDA WVEC:STA WORD 
24HOLDA WVEC+1:STA WORDU+1 
24SOCLI:ELC: RTS 

2450 

2470.HAAL ‘KAR: LDX #BOO 
24BOLDA CMEM,X): JMP VERHOOG 
2430 

2500. SUBR 

2S1OLDY HMEMN+1:STY PAR+1 
2Se20LDY PAG:STY MEM+1 

2S3OLDX #L% DIV D:.TEL 
254OINY:DEX:BNE TEL 

2550SIY IP+1:STY LMEM+1 
2SB5OLDA #CL% MOD D)+1 

2570STA IP:STA LMEN 

2580LDY #&00:STY PAR:STY MEM 
2590.V:LDA CPAR),Y:STA CMEM),Y 
EPBOOCMP #&FF:BNE U1i:RTS: UI 


BBC+BASICODE II J.ENGELS ATOM NIEUWS PHG, 250 


2B10INC PAR:BNE U2: INC PAR+1 

e520.ve: INC MEM:BNE U 

2530INC MEM+1: JMP U 

2540 

2650.DRUKAF:STA TXT 

B2SESOLDA #AAN DIV D:STA TXT+1 

2570LDY #&FF: „DRUK 

2S5B80INY:LDA CTXT),Y:JSR OSASCI 

25S0CMP #CR:BNE DRUK:RTS 

2700 

27103:P%=Hi+Lx+1:COPT 1% 

2720.AAN: J: PROCMELDCCHRSCI2J+CHRSCIS)+"IK ZOEK. ..">:COPT I% 
2730. HEADER: 3: PROCMELDC"”HEADER GEVONDEN”"):COPT 1% 











2740.UIT:J: PROCMELDCCHRSC7)+" INLEZEN GESTUPT"):ECOPT 1% 
2750,S5UM ROCMELDC”CHECKSUM FOUT"”):CDPT 1% 

2750.VOL: J: PROCMELDC"SEHEUGEN VOL”) 

277ONEXT 1% 

2780 


2730PRINT”BASICODE-II LEESPROGRAMMA” 
2BOOPRINI"v=emamannnnnmenmmmnmm nm 
2B1OPRINI'"KIES EEN DER VOLGENDE OPTIES: ”” 
2B20PRINI"CALL &”;“B2;”: -ZET SUBR. KLAAR” 
2B30PRINTTABCI2); ”"-WACHT OP 'STX'” 
2840PRINT”CALL &”;“B1;”: -LAAD ZONDER SUBR.” 
2850PRINTTABC12); "-WACKT OP 'STX'” 
2BSEOPRINI"CALL &”;“BO;": -LAAD ZONDER SUBR.” 
2870PRINTTABC12); ”-WACHT NIET” 

EBBOPRINT’ "GEEF EVENTUEEL EERST 'NEW',”* 

2830 

2S0O0FOR I%=0 IO L%-1:TCHA+IK)=TCPAGE+IZD: NEXT 1% 
ESLOPCHZ+LAJ= EFF : END 

2ge0 

2930DEF PROCMELDCMELOS) : SPx=MELDS: P4=PX+LENCSP%) +1 : ENDPROC 








took, Fm not taking any ap “om you this morning! 
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LOREM BASISAVE 

20 

3OREM BASICODE-II SCHRIJF- 
KOREM PROGRAMMA VOOR DE 
SOREM ACORN ATOM MET BBC- 
BOREM KAARTJE. 

7OREM VERSIE 0,2: 8560207 
BOREN Cc) JOOP ENGELS 


SOREN BROMSTRAAT 102-11 
1OOREM 6525 BH NIJMEGEN. 
110 
120CLS: 2%=0: D=256 
130 
1406%=-8700 


1SOREPEAT G%=G4+8100:?G%=?G% EOR &FF:Hie7G%: TGxe?G% EOR &FF 
1BOUNTIL H%e=PG% OR G%>=&4000 
170 

180H%=G%-4200 : HIMEM=H% 

190 

2OOSTX=&82: ETX=883 
210LF=&0A: CR=&OD 
220SPACE=ASC" ”:PROMPI=ASC*">" 
23ONUL=ASC"O";: COLON=ASC": ” 
240 

250CSUM=470: TEMP=671 
EBOXSAU=&72: YSAU=B7 3 
270STATUS=&74 
EBOPAR=878 : AUX=47A 
23OLVEC=&7C: VORDU=&ZOC 
JOOWVEC=&7E : WRCHU=BZOE 

310 
JEOSCREEN=&401F : PORT 'C=&7002 
3300SRICH=&FFEO: OSASCI=&FFE3 
S4ODSNEUL=EFFE7 

350 

360FOR 1%=0 TO 3 STEP 2 
370P%-Hx:COPT 1%:JMP BASISAVE 
380 

390, PROG ' SAVE 

HOOJSR SET 'WRCHU 

BIOLDA #&00:STA STATUS 
420SEI: JMP HIGH'TONE 

430 

BHO, SET WRCHU 

HSOLDA WRCHU: STA WVEC 
450LDA WRCHU+1:STA WVEC+1 
H7OLDX HURITE MOD D 

$BOLDY #URITE DIV D 
HSOPKP:SEI:STX WRCHU 

SOOSTY WREHU+1:PLP: RIS 

510 

520.WRITE 

530PKA:STX XSAU:STY YSAU 
S4OLDX STATUS: BNE WRI 

SSOSTX CSUM:LDA #STX 

SEOJSR SEND'BYTE:LDA #CR 
57O0INC STATUS:BNE SEND 
580,WR1: DEX: BNE WR2 
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530CMP #SPACE:BEG QUIT 1130.PERIOD'COUNT: JSR TRANS 


60OCMP #PROMPT:BEG BACK 1200DEX:BNE PERIOD' COUNT: RTS 
B10INC STATUS 1210. TRANS 

G20CHP #NUL:BCE TEST 1220BIT PORT'C:BEQ TRANS 
B30CHP #COLON:BCS SEND 1230, TRANS: 

G40INC STATUS:BNE SEND 12HOBIT PORT'C:BNE TRANS1:RTS 
650.WR2:DEX:BEQ TEST 1250 

550,WRA: DEX: BNE WRé 1250.BASISAVE: LDA #NUL 

B70CMP #SPACE:BEQ SKIP 1270ADC #800:STA TEXI2+E 
680CMP #NUL:BCC SEND'SPACE 1280LDX #TEXT1 MOD D 

BSOCMP #COLON:BEC SEND 12SOLDY #TEXT1 DIV D 

700, SEND ‘SPACE : PHA 1300JSR MESSAGE 

710LDA #SPACE OR &80 1310.WAIT'FOR'CR: JSR OSRDCH 
720JSR SEND'BYTE: PLA 1320CMP #CR:BNE WAIT 'FOR'CR 
730.SKIP:INC STATUS:BNE SEND 1330JSR OSNEWL:JSR PROG' SAVE 
740.WR4:DEX:BNE QUIT 1340LDX #TEXTE MOD D 

750CMP #SPACE:BEQ QUIT 1350LDY #TEXT2 DIV D 

760DEC STATUS:DEC STATUS 1350 

770.TEST:CMP #CR:BNE SEND 1370. SET ‘WORDV 

780DEC STATUS 1380STX AUX:STY AUX+1 
780.SEND:CMP #LF:BEG QUIT 13S0LDA WORDV:STA LVEC 

BOOSTA SCREEN:ORA #880 1400LDA WORDU+1: STA LUVEC+1 
B1OJSR SEND'BYTE: .QUIT 1410LDX #WORD MOD D 

BEOLDY YSAU:LDX XSAU:PLA:RIS 1420LDY #WORD DIV D 
830.BACK: JSR RESET WRCHU 1430PHP: SEI:STX WORDU 

B4O0LDA #EIX:JSR SEND'BYTE 14HOSTY WORDU+1: PLP; RTS 
BSOLDA CSUM:JSR SEND'BYTE 1450 

B&OJSR HIGH'TONE:CLI 1450. WORD: CMP #800 

B7OLDX #800:STX PORT'C 1470BEG ENTER'LINE: JMP CLVEC) 
BBODEX:STX STATUS:BMI GUIT 1480,ENTER'LINE 

820 1880STX PAR:STY PAR+1 

300. RESET ‘WRCHU: PHP: SEI 1500LDY #801:LDA CPAR),Y: TAX 
A1OLDA WVEC:STA WRCHU 1510DEY:LDA PAR), Y 

S2OLDA WVEC+1:STA WRCHU+1 1520STA PAR:SIX PAR+1 

A30PLP: RIS 1530.NEHAR: LDA CAUX),Y 

240 1540BEQ RESET 'WORDU 
950.SEND'BYTE 1550STA LPAR), Y: INY 

S5OPHA: STA TEMP 1SB60CMP #CR:BNE NCHAR 

S7OJSR PERIOD:LDY #11:CLC 1570TYA:CLC:ADC AUX: STA AUX 
3980.NBIT:BCC BIT'O 15BOLDA AUX+1:ADC #800 
990.BIT'1:LDX #807:STX PORT'C1530STA AUX+1:RTS 

1000LDX #802:JSR PERIOOS 1500 

1010BCS ROTATE 1510.RESET ‘WORDU: PHP: SEL 
1020.BIT'O:LDX #804:SIX PORT'C1620LDA LVEC:STA WORDU 
1030JSR PERIOD: INC PORT'C 1630LDA LVEC+1:STA WORDU+1 
1O4OJSR PERIOD 1640PLP:CLC:RIS 

1050, ROTATE: SEC: ROR TEMP 1550 

1060DEY: BNE NBIT:PLA 1550.RE'ENTRY:JSR RESET ‘WORDU 
1070 1670LDX #TEXT3 MOD D 

1080 . CHECK ‘ SUM 1680LDY #TEXTA DIV D 
1090PHA: EUR CSUM:STA CSUM 1530 
1100PLA: RIS 1700. MESSAGE 

1110 1710STX AUX:STY AUX+1:LDY #&00 
1120.HIGH ‘TONE 1720.NBYTE:LDA CAUX>,Y:BEQ RET 
1130LDX #807:STX PORT'C 1730JSR OSASCI: INY:BNE NBYTE 
114OLDA #8B0:LIX #800 1740.REI: RTS 

1150BEQ PERIOD' COUNT 1750 
1160 1750.TEXT1:1:SP%=”RECORO THEN RETURN ” 
1170. PERIOD: LDX #801 1770L0PT 1%:BRK Px=PX+LENCSP%) 





1180.PERIODS:LDA #&10 1780.TEXT2: 1: SP%=”L,0000, ”:PA=PA+LENCSPZD +1: 
COPT I% 
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50 

70 

80 
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100 
110 
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210 
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230 
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1730,TEXT2A: 1:SPx-"CALL 8"+STRSRE'ENTRY: P5=PX+LENCSP%)+1 
1BO00LOPT I%:BRK 

1810,TEXT3: 1: SPx=CHRSC7)+"PROGRAM SAVED”: P4=PX+LENCSP%) +1 
1820COPT Ix:BRK:J:NEXT I% 

1830 

184OPRINT "BASICODE-II SCHRIJFPROGRAMMA" 

185OPRINT "ammmman. 
1850PRINT "U KUNT KIEZEN UIT: 
1870PRINT "C%=O : ZET HELE PGM OP BAND" 
1880PRINT "C4e1 : ALLEEN VANAF REGEL 1000” 
1B30PRINI "ROEP DAARNA DE ROUTINE AAN MET:”' 
1300PRINT "CALL &”,“HIMEN, ”.”" 

1S10END 
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REM BADINERIE 
FOR Ie1 TO 2 
PLAY A”4,‚C”B,A”8,E'4,A”B,E'B,C'4,E’B,C 


'B‚A’2 
PLAY E8,’8,C’8,A’8,B'8,A'B,B'B,A'&,G#8 


PLAY A"4,C*B,A"8,E'4,A”B,E'B,C'4,E'B,C'B,‚A 

PLAY C'8,B’6,C'8,R8,C'B,B'8,C'B,RB,A”4,C'4,C'4,B' 4 
PLAY E'8,0'#8,E’B,R8,E'B,D'#8,E'B,RB,C"4,E’'4,E'U,D'#4 
PLAY B'8,E’8,G'8,E'S,F’#0,E'8,F'#8,E’8 

PLAY D’#8,F’#8,A"B,F’#8,G'B,F'#B,G'B,F'# 

PLAY £'8,G'8,E'8,D'#8,E'8,A”0,E’8,D'#0,E'B,B”A,E'8,0'#8 
PLAY E°8,C”8,E'8,D'#8 

PLAY E'8,C”8,8”8,A"8,B"8,G'B,F'#0,E'B 

PLAY G'4,F'W4,E'4. ‚RB 

NEXT 1 

FDR I=1 IO 2 

PLâY E’'4,G'B,E'B,B’4,E’8,8’'B,G4,B'B,GH,E2 

PLAY A'4,6#4,D'4,C'#8,E'B,G'4,F'B,E'B,F'4,D'4 

PLAY F’4,A”B,F'B,D'4,F’'8,0’8,8'4,D'B,B'B,G2 

PLAY G8,C'B,E’8,C’E,0’8,C'8,0'8,C'8,B'8,D'B,F'A,D'8,E’B,D'8,E'B,0'B 
PLAY C'8,E°8,C'8,B'B,C’8,F’B,C'B,B’B 

PLAY C'8,G'8,C'8,B'B,C'B,A"8,C'8,B'B 

PLAY C°’8,A”8,G’8,F'B,G'B,E’8,D'8,C'B,E'4,D’4,C’ 4, ‚RB 
PLAY E'8,0’8,E'8,R8,E'B,D’'8,E’'8,RB,C"4,E'4,E’4,D’' 4 
PLAY 0’8,C’B,D’8,R8,0’8,C'G,D’B,RB,B"4,D’'4,D'4,C'4 
PLAY A”B,R8,C”8,A”B,F'2,R4t‚A"B,F'8,D'2,R4 

PLAY F’'8,0’'B,A'#0,0’8,F’B,D'B,A’#4,A’4,Ge4 

PLAY EH,‚F4,E4,‚A'4,G#B,B’8,D'4,C’8,B'8,C'4,A'"8,C'A 
PLAY E'4,C'B,E'8,A"8,R8,E'4,D'8,C’B,B'8,C'9,A’1 

NEXT 1 

END 
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1OREN FCOS 
20J-50; DIMLLJ;F . 1=OTOJ; LLI=#FFF;N. ;G=0 
30P.s12” FCOS » 

HOIN, '"”GEEF STARTADRES BV #3C00 ”Z; IF?18=2/255;6,40 
SOLL1=#CA; LL2=#209; LL3=#2OE; LL35=#BOO2; LL35=#C3B4 
BOLL37=#CS5B; LL38=#FB4F ; LL33=#FABB; LL4O=#FBB3; LLU1=#FCBF 
7OLL42=#FC23; LL43=#FCHO; LLHS=HFCBD; LL4G=HFCCD 
BOLL47=#FCDB; LL4B=#FCDA; LL4O=HFDUB; LL5O=#FFD1 
SOP.S21;F.1-ATD2;P=Z; IFI=2;P.85 

100C 

110: LLOLDXE#OS; LDY@#OS 
120:LLSLDALL#H,X; STALL3, Y; DEX; DEY ; BMILL7 
130CPY@#O5 ; BNELLB; LDY@#O1 ; BNELLB 

140: LL7 JMPLL37 

159: LLBSIX#EC; STY#C3; PHP; SEI 

150JSRLL16 

179: LL1OLDAG#7E ; STAKCO 
180:LL11JSRLL4S;BECLL10; INC#CO; BPLLLA1 

199: LL12CLC 

200: LL13PHP; JSRLL 45; JSRLL 41 ; CPX@#12; BESLL14 
210PLP;BCSLL1S; SEC; BESLL13 

22O:LL14; PLP 

230: LL1SROR#CO; BECLL12 

2UOLDACO; PLP ; LDY#C3; LOX#EC; PHA 

250CLC; ADCHOC ; STA#DC; JSRLL16; PLA 

2BORTS 

270: LL1GPHP; PHA; TYA; PHA; LDALL2 

2BOCMPEAFE ; BNELL 17; LDA#EA; BNELL17 ; LDY#HEO 

29OBMILL17; LDACHDE) , Y; EURR#SF ; STACHDE) ,Y 
300:LL17PLA; TAY; PLA; PLP; RTS 

310: LLIBSTXH#EC ; STY#CA; PHP; SEI ; PHA 
320JSRLL1E; JSRLL 42; STAKCO; JSRLL 47; LDAEHOA 
330STAAC1 ; CLC 

340: LL19BECLL2O; LOXE#07 ; STXLL 35; LOXE#O1 ; JSRLL48 
I50BMILL21 

359: LL2OLDAP#OG; STALLAS; JSRLL47 ; INCLL25; JSRLL47 
370: LL21SEC; ROR#CO; DECHC1 ; BNELLIS; JSRLLIG 
ABOLDY#C3; LOXHEC; PLA; PLP; RTS 

390: LL22STXLL35 ; LDXE#3C ; JMPLL 40 

HOO: LL23PHP; SEI ; JSRLL3B; PHP; LDAE#OG 
H1OJSRLL43; LDXE#07 ; JSRLL22; PLP ; BNELL24 
H2OJNPLL39 

430: LLEULDXEROH 

G4O: LLESLDA#CE, X; STA#DE, X; DEX; BNELL25; STX#DO 
H5OSTX#D1 ; LDA#DS; BNELL26 ; DEC#DG 

460: LLESDECHDS; CLC 

470: LL27ROR#D2; SEC; LDXERFF ; LDA#DS ; SBC#DA 

HBOSTAKCF ; LDADS ; SBC#D4; PKP; RORHD2 

#SOPLP; BECLL28; CLC; BEQLL2B; STX4CF 

SOOSEC 

510: LL28ROR#D2; INX; JSRLL23; INC#DO; INCHD4 
SEOINC#CC; ROL#DE; BESLL27; PLP; RTS 

530: LL2SLDXE#O7 ; JSRLL 2e; STXHDC ; LDYEHOH 

540: LL3OLDAB#PA; JSRLL 50; DEY ; BNELL30 

550: LLIILDACHCS) ,Y; JSRLLSO; INY; CMPEHOD; BNELLI1 
556OLDYE#O8 

570: LL32LDALLt, Y; JSRLLSO; DEY ; BNELL 32 ; LDX@#10 
SBOJSRLL4O; BIT#D2; BUCLL IH; DEY 

530: LLAAINY; LDACHDI), Y; JSRLLSO; CPY#CF ; BNELL33 
600: LLA4LDA#DT ; JSRLLSO; LOXEHO4; STXLLIS; RTS; :LLHU; J 

B1OP!O=1L23;P! 2=1L8;P! tell 18 

BEON.;P,* "CODE VAN "BZ" TOT “&P+6'$3 
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GDOS 1,5: Inleiding 





Het nu volgende verhaal Is de complete beschrijving van het 
disc-pakket GDOS 1.5, d.w.z, bouw- en gebruiks beschrijvingen. 
Dok zal er nog enige aandacht aan theorie omtrent het disc 
gebeuren gegeven worden. 
Allereerst enkele faciliteiten welke het GDOS 1.5 pakket 
omvatten: 

- disc controller WDI793 of WD1797 

— 48 of BĲ tracks 

= single- en double density 

—= shugart en phílips bus 

— write precompensation 

= eigen clock 

— 4 S5- of 2 DS drives aan te stuiten 

= zeer goedkoop 

= Philips drives aanpassingen 

= software matige density selectie 

— 78 files per kant 

= filenamen tot 15 karakters 

„= alle AcornDos commando's, exclusief random files 

— vele nieuwe commando's 

— geschreven in SALFAA 1.5 

—= echte foutmeldingen 

— error nummers in basic op te vangen 


Voordat het gehele verhaal op U af komt stormen, wil ik nog 
zeggen dat op dit moment een print voor het disc-pakket in 
ontwikkeling is. Maar echte knutselaars kunnen direct met het 
bijgeleverde schema aan de slag. 

Tevens wil ik nog een dankwoord richten aan de heren Jan Klaas 
Biel en Bram Poot, voor het willen bouwen, testen en commentaar 
leveren op de bijna eindeloze versies van GDOS. Laatst genoemde 
verdient nog een extra bedankje voor het vele schrijf- en 
telefoneerwerk wat hij heeft moeten plegen om dit DOS pakket 
tot een federatief produkt te maken. 


Gerrit Hillebrand 
Mendelssohnstraat 5@ 
7557 BJ Hengelo 
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GDOS 1.5: Theorie 





De door ons gebruikte floppy-disk-controlter (FDO) is de 1793 
of de 1797. De laatst genoemde is eigenlijk bedoeld voor 
dubbelzijdige drives, maar omdat de overige hardware dit al 
voor ons regelt kan men beter voor de goedkopere 1795 kiezen. 
De 1793 wordt gemaakt door Siemens. Tevens bestaat er een 
second source van de japanse fabrikant Fujitsu, welke volledig 
compatibel is met de 1793: de MBBB77. 

De 1793 is zowel geschikt voor 8- als voor S 1/4 en 5 1/2 inch 
drives. Bij 8 inch drives dient het klok-signaal tweemaal zo 
hoog te zijn. Hoe dit in de hardware gebeurt wordt beschreven 
in het hoofdstuk ‘Hardware’. In onderstaande figuren we de 
aansluitingen van de FDC en hoe de FDC is geschakelt als 
schakel tussen bus en drive. Met behulp van deze twee figuren 
proberen we een aantal lijnen te verklaren: 





Reset — een laag ingangssignaal reset de FDC. Direct na het 
opheffen van de reset zal de FDC een ‘restore’ commando geven, 
waardoor de kop weer boven track8 geplaatst wordt. 


D8 / D7 -— Dit is een bidirektionele databus, 


AB / Al - De FDC heeft 5 interne registers die met deze (adres) 
lijnen geselecteerd worden. 


Chtp select — Als deze laag is kan de processor met de FDC 
communiceren. 


READ/Write — NRDS en NWDS signalen (wel bekend). 


Data Request (DRE) — Bij het lezen van data van de discette 
wordt deze uitgang hoog als er een byte is geassembleerd en 
klaar is om te worden afgehaald. Âls de FDC met schrijven naar 
discette bezig is, wordt DRO hoog als er een byte nodig is. Een 
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zehnidt of lees handeling naar of van de FDC reset de DRO 
ijn, 


Interrupt Request (IRQ) — Deze uitgang wordt hoog ten teken 
dat de FDC met een opdracht klaar is. Schrijven naar het 
commando register of lezen van het status register van de FDC 
reset IRQ, 


De meeste fabrikanten van drives hanteren de zogenaamde 
Shugart-bus als standaard (op enkellen na, waaronder Philips’ 
oude modellen), In onderstaand figuur ziet men een Shugart bus 
voor zowel de 5 1/4- als de B inch drives. 


De print op de drive is voorzien van 
een edge-connector met vierendertig 
aansluitingen. Via een printconnector 
en een bandkabel wordt de drive met de 
controller-kaart verbonden. 

Veelal wordt de head-load aansluiting 
van de drive niet gebruikt. Gebrüik 
wordt gemaakt van de mogelijkheid om 
het head-load signaal te combineren 
net drive-select. 





Motor on — Een laag nivo zet de drive-motor aan, 


Select — De drives zijn uitgerust met een selecteer 
mogelijkheid. Een laag nivo op de bewuste selectielijn 
selecteert de drive. 


Head Load — Een laag nivo zet de schrijf-lees kop op de 
discette. Veelal maakt men gebruik van de mogelijkheid om 
Head-load via een selecteer lijn te activeren. Op de drive kan 
dit met een draadbrug worden ingesteld. 


Side select — Geìdt alleen voor dubbelzijdige drives. Een 
logische '@’ selecteert kop 2. 


Step — Een negatieve guls op deze lijn geeft een 
kopverplaatsing over een track (stappenmotor). 


Direction — Hoog geeft een verplaatsing van de kop naar buiten, 
laag naar binnen. 


Ready — Drive meldt zich ‘klaar’ top toeren) 


Index — Wordt laag als het index gat op de discette de optische 
koppeling passeert. 


Write protect — Is bij een beschermde schijf (stickertje op de 
uitsparing aan de zijkant) laag. 
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Write data — Schrijfsignaal met klok- en data pulsen 


Write gate — Zet schrijfkop en tunnelwisselelementen aan. 


Raw data — Alle data- en klokpulsen die de kop van de discette 
leest. 


De read-clock is een signaal dat de FDC nodig is om de 
databitjes uit het raw-data signaal te kunnen scheiden. Voor de 
opwekking van de read-clock wordt een aparte schakeling 
gebruikt, die met het VFO-enable signaal kan worden aan en uit 
gezet. 

De hierboven genoemde signalen zijn in het eerste figuur tussen 
de drive en de FDC getekend. In praktijk zullen buffers, 
invertors em aanvullende electronica nodig zijn. 

In het eerste figuur zijn head-load-timing, TG45, early, late 
en test niet genoemd. 

Early en Late bieden een compensatie mogelijkheid voor bitshift 


tijdens het schrijven. Dit gebeurd veelal bij tracknummers 
hoger dan 45. In deze controller zullen we de compensatie 
mogelijkheid altijd gebruiken vanwege zijn hoge 


betrouwbaarheid. 

Aan Test dient men niet aan te komen (test mogelijkheden, 
vertragingen in FDC zijn hiermee te elimineren). 

Het hoog maken van HLT (head load ‘“ timing) brengt de FDC in een 
pauze toestand. Deze wordt gebruikt in combinatie met de 
head-load aansluiting. Het activeren hiervan triggert een 
monostabile multivibrator, waarvan de uitgang met HLT is 
verbonden. Hier stopt de FDC even om de kop de gelegenheid te 
geven tot rust te komen. Deze extern opgewekte vertragings tijd 
bedraagt 58 tot 88 msec. 


Dataseperatie. De data op de discette is gemengd met het 
kloksignaal. Bij het terug lezen van de data van de discette 
moet een referentie signaal worden opgewekt om de FDC in staat 
te stelten de raw-data op de juiste wijze te interpreteren. Dit 
referentie signaal heet Read-clock. Voor meer details, zie 
heefdstuk ‘Hardware’. 


storage methoden. 

De methode welke wordt toegepast om een stroom van bits op een 
floppy te zetten, wordt voltedig ver zorgd door de 
disc-controller. We herkennen twee manieren om data op een 
schijf te zetten, namelijk single- en double density. Het enige 
verschil tussen single- en doubie density is de grootte van de 
zgn HEAD-GAP. Je kunt wel een double-density drive gebruiken om 
single-density schijven te schrijven en te lezen, maar 
omgekeerd ìs dit niet mogelijk. 

Belukkig hanteren de meeste computer fabrikanten, op enkele 
uitzonderingen na zoals Apple, een standaard. Deze standaard 
komt, hoe kan het ook anders, van IBM. 

De FM (Frequency Modulation) voor singte density en MFM 
(modified Frequency Modulation) voor double density. Het 
enigste wat nodig is, is een makkelijke manier om een 1 en een 
0 te decoderen. 

De werking van FM wordt gedemonstreerd in onderstaand figuur. 
De klok- en data pulsen worden eenvoudig uitgefilterd via een 
simpele mono-stabiele of een phase-locked-loop schakeling. 
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uri Ba TI Ta 
1 Lj e 1 
C « CLOCK PULSE TIME 
© = DATA PULSE TIME 
€ D € B € DD € 


De MFM methode is tetwat gecompltceerder, in zo verre dat er 
geen enkele klok puls wordt vastgelegd totdat er een paar 
‘nullen’ gezamenlijk worden gedetecteerd. 


mr rz dd Ba 
1 Li e 1 
€ = CLOCK PULSE Time 
D= DATA PULSE TIME 
€ D t Ld € B € Ld 


Nu we een manier van vastleggen hebben, dienen we de schijven 
zodanig te formatteren, dat de data gemakkelijk is terug te 
krijgen. 

De manier die wordt toegepast is het formatteren van een track, 


welke opgebouwd ís uit een aantal identieke stukjes 
‘opslagplaatsen’ (sectoren) die elk wel een uniek nummer 
hebben, 7 


Zo'n sector kan een grootte hebben van 128, 256, 512 of 1824 
bytes, We hanteren de IBM standaard van 256 bytes. In 
singie-density passen er 18 sectoren in een track en in 
double-density 16 sectoren. Hier is zelfs 18 sectoren mogelijk, 
maar dit ís niet meer volgens een of andere standaard. 

Single density ; IBM 5748 format 

Double density : IBM 34 format 


Eigenlijk heeft de IBM 3748 formaat sectoren, elk 128 bytes 
groot, 26 sectoren per track, Maar om ook oude schijven voor de 
Atom te kunnen lezen heb ik het andere, ook toegestane formaat, 
van 256 bytes per sector, 18 sectoren per track toegepast. 

In onderstaand figuur is te zien hoe een sector op een schijf 
geformatteerd wordt. Het figuurtje daaronder geeft een track 
formaat. 





De tracks worden geformatteerd vanaf track JO. Dit is de 
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buitenkant van de schijf. Elke volgende track is naar binnen 
gericht. Track 59, bij een 4@-tracks drive is dus de track die 
zover mogelijk naar binnen ligt. 

Hoe is het nu mogelijk in zo’n track een sector te lezen of te 
schrijven. We moeten namelijk eerst zo'n sector vinden, Dit 
gaat als volgt. 

Elke sector bestaat In feite uit twee delen; een ID=-field en 
een data-field. Het ID-field bevat informatie welke nooit 
verandert wordt. Dit ID-field is tijdens het formatteren 


opgebouwd en naar schijf gestuurd. Tijdens het formatteren 
maakt het zowel de drive, als de FDC niets wit wat je naar 
discette stuurt. In dit ID-field wordt opgeslagen het 


sector-nummer; het track-nummer, de schijfkant (bij ons niet 
van belang), CRC data en de lengte van een sector. In het 
data-field worden de 256 bytes netjes achter elkaar 
weggeschreven. 

Om nu de FDC een bepaalde sector te laten vinden, behoeven we 
alleen maar te zeggen welke track en welke sector hij moet 
hebben. De FDC kan nu zelf de track-nummers en sector-nummers 
met elkaar vergelijken uit het ID-field, 

Voor meer details wat betreft de track opbouw, verwijs tk U 
naar de data-sheets en de source van GDOS 1.5, waar opgevouwen 
tabellen van een track te zien zijn. 

De lengte van een sector staat in een ID-fíeld opgeslagen als 
code: 88-128 byes, 21=256 bytes, 02=512 bytes en 03-1824 bytes. 
Voor synchronisatie doeleinden worden er speciale data patronen 
of adress-marks op disc opgeslagen. Deze zgn. adress-marks 
corresponderen met een opeenvolgende rij van pulsen die normaal 
niet voor kunnen komen omdat deze bepaalde klok-pulsen missen. 
In dit geval kan de díisc-hardware altijd adress-marks scheiden 
van data-fields. Er worden verschillende van dit soort 
adress-marks gebruikt om duidelijk te maken waar een ID-field 
en _ een data-field begint tresp. ID-adress-mark en 
data-adress-mark). Aan het eind van elk ID- en datar-field komen 
er twee Cyclic Redundancy Check (CRC) bytes, om te controlleren 
of de data gelezen is met of zonder fouten. CRC bytes worden 
elke keer berekend indien een field geschreven wordt en 
nagerekend indien een field gelezen wordt. Kloppen deze twee 
niet met elkaar dan zal er een fout melding gegenereerd worden. 
Tussen de verschillende fields worden er ook zogenaamde ‘gaps’ 
geplaatst om timings problemen op te heffen. Er is een gap 
nodig voor de ruimte na iedere index-puls (onbetrouwbaar 
gedeelte) en een gap na de laatste sector op een track 
(opvullen tot aan de index-puls). Voor details zie data-sheet. 


Nu we alles weten van de functionele electronica en het zgn. 
soft-sector formatteren, enige informatie over de werking van 
de FDC in combinatie met een drive die een geformatteerde 
schijf bevat. 

De operaties die modig zijn om een sector te schrijven of te 
lezen zijn tamelijk recht-toe-recht-aan. Als het track register 
van de FDC het track nummer bevat waarop dit moment de kop 
boven staat en het verlangde track nummer in het data register 
dan kan men een SEEK commando in het commando register stoppen 
(commando's van de FDG zijn te zien in de data-sheets). Dit 
commando zorgt ervoor dat de FDC stepping pulsen gaat geven 
naar de verlangde track, De FDC controlleerd de track nummer op 
de schijf met die in het data register. Als het klopt wordt het 
track nummer in het track register geplaatst en klaar is kees. 
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Nu kan het sector register gevuld worden met de verlangde 
sector en in het commando register een WRITE-SECTOR of 


READ-SECTOR gestopt worden. De rest wordt afgehandeld door de 
FDC. 

Het formatteren gebeurd met behulp van het WRITE-TRACK 
commando, Zowel READ-TRAEK commando (let op, erg onbetrouwbaar 
commando) als het WRITE-TRACK commando trekken zich niets aan 
van sectoren-structuren in tracks en lezen of schrijven alles 
‘inclusief klokpulsen) wat hun voor de voeten komt. 


Nog enige informatie omtrent het begrip Sector-Interleaving, 
wat ook toe gepast wordt ín GDOS 1,5, 

Normaal zul je denken dat na het formatteren de sectoren netjes 
achter elkaar in een track liggen, volgens het rijtje: sector 
142,3seeve41b (double density). 

Doch wanneer je de FDC opdracht geeft om een sector te lezen of 
te schrijven zal deze net zolang zoeken in een track totdat 
deze hem te pakken heeft. Na dit schrijven of lezen zal de 
software nog bezig zijn om uit te zoeken of de operatie goed is 
gegaan of niet, Zo ja, dan zal de software de registers weer 
vullen voor de volgende operatie. De schijf zal ondertussen 
door blijven draaien en zodoende kan het voorkomen dat de kop 
al de volgende ID-field van eer sector gepasseerd is, terwijl 
we die juist moesten hebben. Hierdoor zal de schijf een 
volledige slag moeten draaien om te zorgen dat de FDC de 
volgende sector kan vinden, Om dit te voorkomen wordt het 
zogenaamde interleaven toegepast, Tussen de opeenvolgende 
sectoren liggen andere sectoren die niet opeenvolgend zijn, 
Hierdoor ís het mogelijk om toch snel opeenvolgende sectoren 
binnen te halen of weg te schrijven. 

Sector volgorde: 

DD — 1,12,7,2,13,8,3,14,9,4,15,10,5,16,11,6 

SD — 1,8,5,2,%,6,3,18,7,4 
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GDOS 1.5 Hardware 








Als je zo het schema bekijkt dan lijkt het behoorltjk 
gecompliceerd. Doch dit valt ontzettend mee. Het geheel ís 
tamelijk recht-toe-recht-aan. 

We beginnen bij de decodering. Dit is al een belangrijk punt 
als je het geheel wilt aansluiten aan de Atom. 


IC2 (74139) decodeert de twee 4K gebieden voor het EXXX (ROM) 
en het BXXX (1/0 blok), De selectie lijn voor EXXX gaat direct 
naar de chip-enable van de eprom (2732) waarin de GDOS komt (of 
reeds zit). Het BXXX-blok zal toch nog iets gedetaileerder 
uitgedecodeerd moeten worden om de B bytes die nodig zijn voor 
de totate controller-interface over te houden. 

ICG (74L5488) is een TTL-comparitor, die ge-enabled wordt door 
de BXXX lijn. Met behulp van de 8 schakelaars (dip-switches) 
kan men een geheugen blok instellen in het BXXX blok, ter 
grootte van 16 bytes elk beginnende op BXX@. Voor het instellen 
van de dip-switches refereer tik naar hoofdstuk ‘GDOS 1.5 : het 
gebruik’. 

Indien het blokje van 16 bytes geselecteerd is, zal de 
comperator een actief laag signaal afgeven aan de helft van ICS 
(74LS159) welk op zijn beurt retjes de 4 bytes uitdecodeerd per 
1/0 item (IC 4 en 5). 

Pin 23 van IC4 (6821) is de chip=enable pen en pin 5 die van de 
FDC, IC 5 (WD1793). 

Vermeld moet worden dat de buffer ICI (74LS245) geselecteerd 
wordt bij de volledig uigedecodeerde 16 bytes. IC1 is een 
bi-direktionele buffer, geplaatst vanwege de beperkte fan-out 
(zl) van de FDC. De richting waarin de buffer ‘opengaat’ wordt 
bepaald door het R/W signaal. 


Het 1/0 gedeelte 





IC4 is de welbekende en zeer goedkope 6821 waarvan in deze 
controìler alleen poort A gebruikt wordt. De andere poort is 
vrij voor verder particulier gebruik. De selectie van de 6821 
ligt in het gdeelte BXXO-BXXS. 

Pin 2 (PAG) genereerd de side-select. 

Pin 3 en 4 (PAI en PAZ) selecteren de drive. 

Pin 5 (PAS) hangt aan de Double-density selectie lijn van de 
FDC. Een ® wil zeggen double-density. 

Pin & (PAA4A) is de software-mattge reset lijn naar de FDC. Door 
het *DOS commando wordt deze lijn voor een bepaalde tijd laag 
getrokken. Bij het indrukken van de BREAK knop zal ook deze 
lijn lag getrokken worden (diode Di en weerstand R12). 

Pin 7 (PAS) is een output lijn die laag is bij een 40-tracks 
drive. Deze wordt hoog bij het selecteren van een 8@-tracks 
drive d.m.v. het commando *#60. Deze output lijn is aangebracht 
vaor het software-matig omzetten van 88 tracks drives naar 
40-tracks en omgekeerd, Bij enkele drives, zoals een BO-tracks 
TEAC kan men dit via een input-lijn doen. Andere en meestal ook 
goedkopere 82-tracks drives hebben zo'n lijn niet en is er dus 
externe hardware nodig om in de mode van een 40-tracks drive 
i.p.v. i steppuls er twee te krijgen. Zo’n hardwareaanpassing 
vindt men in hoofdstuk ‘GDOS 1.5 : het gebruik’, Ze zijn ook te 
koop (Bert van Dijk biedt een schakelingetje aan voor “40,-- , 
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doch pas op, dit schakelingetje zal altijd twee pulsen geven in 
48-tracks mede ook indien dit niet nodig is). 


Pin B (PAG) is een input-lijn voor de software detectie van het 
drive-ready signaal. Hierover later meer. 

Pin 9 (PA7) is met de DRO lijn van de FDC verbonden. Hiermee 
kan men softwarematig checken of de FDC bytes verlangt of klaar 
heeft. 


De FDC 





De FDC wordt geslecteerd op het geheugengebied liggende van 
BXX4-BXX7. 

Pin 2 en 4 zijn de NWDS en NRDS lijnen, nodig voor schrijven of 
lezen. 

Pín 1 los laten hangen (test!) 

Pin 40 dient altijd aangesloten te zijn aan 12 Volt indien er 
al een 5 Volt spanning staat op pin 21. Niet eerder! 

Pin 39 is de Interrupt Request lijn. Deze wordt actief hoog 
indien de FDC klaar is met een operatie, Via de open-collector 
inverter van IC 15 (74L586) wordt deze rechtstreeks aan de NMI 
van de £502 gehangen. 

Pin 24 is de klok-ingang. Bij 5 1/4 inch drives moet deze een 
frequentie hebben van 1 Mhz en bij 8 inch drives een frequentie 
van 2 Mhz. Sluit dan pin 24 aan pin 1@ van ICS (74LS393). 

Pin 26 is de Read-clock ingang en hangt aan de uitgang van de 
data-seperator die verderop beschreven wordt. 

Pin 33 is de VFO-enable pen, die de data seperator aan en uit 
kan zetten. 

Pen 27 is de Raw-data ingang, die de uitgerekte data krijgt van 
IC11. 

Pin 36 hangt rechtstreeks aan de open-collector van de drive 
die aangeeft of de schijf write-protect js. 

Pin 17 en 18 (early en late) werken in combinatie met de 
Write-data uitgang, pen Si. Deze zijn aangesloten op IC7 
(7ALSI61) , welke geschakeld is als een write-precompensatton 
schakeling. Hierover later meer. 

De pennen 30,16 en 15 (resp. Write-gate, direction en step) 
zijn via open-collecor invertors aangesloten aan de drive. 

Pin 34 (track @) daarentegen hangt direct aan de open-colìector 
uitgang van de drive. 

Pin 35 (index) wordt later uitgelegd. 

Pin 25 is de Head-load-time en zal in combinatie met de 
mono-stabiee IC11 (7&LS125) de benodigde vertragings tijd 
genereren van 50 to 88 msec. De mono-stabiele wordt getriggerd 
door pen 28 (head-load). 

Gebruikt men Head-load niet voor de drive, dan is het ook niet 
noodzakelijk om de weerstand en de condensator aan te brengen. 
ICi1 moet wel geplaatst worden, want die zijn we ook in de 
data-seperator nodig. 


De data-seperator 


Dit is in werkelijkheid een Counter/seperator. IC1® (74L5f95) 
loopt vrij met een frequentie die bepaald wordt door de input 
op penâ. Dit is 8 Mhz voor double-density en 4 Mhz in het geval 
van single-density. Wanneer er een RAW-READ puls binnen komt, 
zal de teller geladen worden met de waarde ‘5’. Als RAW-READ 
terug keert naar een logische 1, zal de teller beginnen af te 
tellen naar nul en wederom vrij lopen. De helft van IC13 
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{74L574) verzekert ons van een duty-cycle van precies 58% (echt 
noodzakelijk 1) 


De write-precompensation 





De 4 Mhz klok van de klok generator wordt aangeboden op pen 2 
vaniC7 (74LS1&1) en wordt gebruikt bij de 4 bits counter. De 
acties die uitgevoerd moeten worden bij write=prcompensation 
zijn als volgt: 





EARLY LATE ACTIE 
8 [7] detay WD met 150 nsec. 
(rj 1 delay WD met 500 nsec. 
1 [) vertraag WD niet. 


De uitgang van de pre-compenstation schakeling wordt vla een 
open-collector inverter aangeboden aan de drive. 





De klok-generator 





De oscitiator is opgebouwd rondom een B Mhz kristat en 3 
inverters van IC12 (74L504). De frequentie van 8 Mhz wordt 
aangeboden aan de deler IC9 (7408393). De 1 Mhz uitgang (pen 9) 
wordt rechtstreeks aangeboden aan de FDC. De 4 Mhz uitgang 
wardt aangeboden aan de write-prcompensation schakeling en aan 
de open-collector NAND van ICS (74L53B). Aan de andere NAND 
poort wordt de originele B Mhz aangeboden. Door het hoog of 
laag maken van de density selectie lijn kan geschakelt worden 
tusssen 4 en 8 Mhz. Deze frequentie wordt aangeboden aan de 
data-seperator. 


De drive-ready signa(a)lten) 


Uit het schema blijkt dat er gerekend is op twee ‘ready’ 
ingangen. Dit kan voorkomen bij bijvoorbeeld Philips drives 
toude modellen). Deze drives hebben een ready-uitgang die niet 
alleen actief wordt bij het geselecteerd zijn. Om misverstanden 
te voorkomen, is er een schakeling ingebouwd welke alleen van 
toepassing is voor mensen met twee of meer oud model Phitips 
drives, Ándere GDOS gebruikers kunnen het IC16 (7415153) 
weglaten en het ready signaal van de drive doorverbinden met 
pin 13 van IC5. 

Deze schakeling heeft tot functie om alteen DAT ready signaal 
door te geven dat van de geselecteerde drive komt. 





Index/Ready combinatie 





Er is in de hardware een schakeling aangebracht om te zorgen 
dat de index pulsen van de drive dan alleen de FDC bereiken 
indien de drive echt kiaar (lees: op toeren) is. Deze 
schakeling is opgebouwd rondom een helft van ICS. 

Hierdoor kunnen we geen problemen krijgen met het feit dat een 
drive die zich voortijdig ‘ready’ meldt als ready gezien wordt 
door de FDC. De FDC zal namelijk alle data die van de drive 
komt gaan interpreteren op het moment van binnenkomende index 
pulsen. 
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Indien men geen 98 tracks drive gebruikt, sluit dan de link 


tussen STEP-IN en STEP-QUT op het uitbreidings voetje voor de 
88 tracks schakeling. 


Selecteer als het even kan het geheugenblok BCI@-BCI7 voor de 


gehele interface. Hierdoor zijn we aansluitend met de club 
afspraken. 


GDOS 1.5 : het gebruik 





1793 of 1797 

Het gebruik van een WD1797 1.p.v. een WD1793 is ook mogelijk. 
Op de print behoeft men niets te veranderen. De software 
daarintegen kent toch nog enkele verschillen. Dit ís in GDOSI.5 
opgelost door de logische waarde van de FDC1797, Heeft men een 
WD1793, laat dan in het programma de instelling FDC1797=0 
(false) ongemoeid, Heeft men een WD1797, verander dit item dan 
in FDC1797=1 (true), Zie listing regel 578. 


De rest wordt automatisch tijdens het assembleren goed 
verwerkt. 


Shugart- en Philips bus 

De Shugart-bus (354 polig) is een standaard in de wereld. Maar 
oude Philíps drives hebben een afwijkende S5®-polige connector. 
Hieronder de twee bussen naast elkaar: 


SEREREUULNEEIENBEEERT SSN 
ESRERRENSEERESSEEENSSERENE 


1 
3 
$ 
% 
® 
u 
u 
15 
u 
1 
u 
EE 
2 
u 
Ed 
a 
E:] 
EÀ 
Ei 
” 
4 
«3 
« 
bi 
had 





Het is mogelijk om B inch drives aan te sluiten. Doch let op, 
de shugart bus voor een 8 inch drive is niet gelijk aan die van 
een 5 1/4 inch drive. Zie aansluitingen verderop. 


De klok die de FDC dient te hebben bedraagt nu 2 Mhz, (zie 
“hardware ) 
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3-1/2 inch drive 





Alles betreffende de 5-1/4 inch drive, geldt eveneens voor de 
3-1/2 inch drive. 





1/0 blok instelling 
Om de FDC plus de PIA in het 1/0 blok te plaatsen dienen we de 
dipswitches op de print in te stellen. De 8 switches bepalen 


het bereik van de disccontroller in het geheugenblok BXX@. 
Door nu de dipswitch van een adresslijn te sluiten ton), dan 


zal de geselecteerde adreslijn een logische @ moeten hebben, 
Wil de comperator 7415688 ze als gelijk zien. 
De dipswitches komen overeen me: 


dipsw 1 2 3 4 5 & 7 8 
adres A4 AS A& A7 A8 A9 Al@ All 


Wil men nu de PIA op BC18 en de FDC dan op BC14 leggen, dan 
zullen de switches als volgt gesloten moeten worden: 


dipsw tt 2 3 4 5 6 7 & 
on/off O1 tt 118 1 @ 
De sottware aanpassing is makkelijker. De adressen STATUS, CMD, 
vr, RB (listing regel 670-770) staan op dit moment in GDOS 1.5 
goed ingesteld. Zo is iedere instelling in het 1/0 blok 
mogelijk als men maar de software en de hardware op een lijn 


houdt ! 


Assembleren 

Het assembleren van GDOS 1.5 gaat met behulp van de symbolische 
sssembler SALFAA 1.5. 

Het programma beslaat het geheugenblok 2940-8008. Vol dus. De 
dirctives „CODE en „RAM en „TABLE zijn naar eigen goeddunken in 
te vullen, maar let op dat .CODE altijd op E08 ingesteld staat 
i.v.m. de ROM op de controllerprint. 

Wil men nu later uitbreidingen maken of programma’s waarin oude 
DUS calis voorkomen aanpassen, assembleer dan eerst GDOS 1.5 en 
print de symbol-table met behulp van het commando ASM-S uit. 
Deze tabel geeft alle absolute adressen van de labels en 
adressen, voorkomende in het source programma. De zeropage 
adressen worden ook uitgeprint en kunnen in het te veranderen 
stukje programma aangepast worden. 

Voor volledige informatie omtrent het assembieren met behulp 
van de symbolische assembler, verwijs ik naar de SALFAA 1.5 
handleiding, geschreven door Bram Poot in AcornNieuws 4.2 


40-88 tracks 

Dok B@-tracks drives zijn zonder meer aan de díisc-controller te 
hangen. Deze drives zullen een step-afstand nemen die 2 keer zo 
klein is als die bij een 4@-tracks drive. Dus om een 48-tracks 
schijf op een 88-tracks drive te lezen dienen we voor elke 
steppuls die door de FDC gegenereerd wordt, twee steppulsen aan 
de drive door te geven. 
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Dit kan software-matig maar gaat ten 
koste van features in de 1795. Het commando ##80 schakelt aan 
de PIA een lijntje om naar een andere polariteit zodat we 
hiermee een externe schakeling ‘aan’ kunnen zetten om bij elk 
gegenereerde step-puls een tweede te laten doen volgen. #*#40 
schakelt de hele boel terug naar 48 tracks. Een schakeling 
welke geheel aan deze eisen voldoet ziet men in onderstaand 
schema: 




















relatie weerstand R en steprate: 





weerstand R steprate steptijd 
33K 2 18 msec 
18Kk ®1 & msec 
I8K (9,3) 2e 3 msec 


Dp de print zit een voetje waarin we zo'n schakeling kunnen 
prikken, d.w.z. het schakelingetje wordt nagebouwd en via een 
wire-wrap voetje op de GDOS print gemonteerd. 


Voedingen 


De FDC schakeling is twee voedingen nodig, te weten: SV en 12V. 
De i2V dient niet zoveel te leveren, maar bedenk wel dat de 
drive ook 12V nodig is, dus hebben moet je het. LET OP: indien 
de FDC kaart aangestoten wordt zonder 12V aan de controller, 
dan is de kans groot dat de controller op sommige Iijnen onzin 
gaat zetten. Dus stop nooit een beschreven schijf in de drive 
wanneer je geen 12V hebt. Het komt voor dat de controller het 
write-enable signaal actief maakt ongeacht de write-protect 
status en onzin gaat zitten schrijven naar de schijf. 
Resultaat: data op de schijf naar de filistijmen. 





a DOS 1e GERRIT HILLEBRAND ATOM NIEUWS PAG, 43 


Schijven 





Welke schijven je koopt fs niet van zo’n groot belang als het 
maar double-density schijven zijn. Het feit dat een schijf 
single-sided is zegt niet veel, want het komt er op neer dat de 
fabriek bij single-sided schijven alleen de voorkant test. De 
achterkant kan dus ook goed zijn. Ikzelf draai al geruime tijd 
met B8-tracks drive, waarin ik schijven (single-sided, 
double-density) laat lopen van verschillende pluimage. 


Support software 





Op dit moment geef ik bij de source van GDOS 1,5 twee stuks 
support=-software mee. 

Dit zijn 

—omzetten van oude Acorndos schijven naar GDOS 1,5 schijven 


=automtisch ‘showen’ van laatjes, welke een extensie .P 
de schijf hebben P jes, ic op 


Onder delen 









Ict 74LS245 IC1® = 7415193 
IC2 = 74LS139 IC11 = 74LS123 

IC3 = 74LS139 1C12 = 74LS84 

IC4 = 6821 1C13 = 74LS574 

ICS = WD1793/1797 1C14 = 74L5D6 

1C6 = 74L5688 IC1S = 74L506 

1C7 = 74LS161 1Ci6 = 74LS153 (zie tekst) 
ICS = 740538 IC17 = 2732 

IC? = 74L5393 

XTAL = 8 Mhz 

D1 _= IN4148 

R1,19 = 820 

R2,3,4,5,6,11 = 188 

R7,13,14,16,17,18= 10K 

RE, 12 = 4K7 

RI ‚10 = 530 

R15 = 18K2 








a Hof 8e AE 
PRG, 44 ATOM HIEUWS Ts 


+ 


EERE Eh 
EER HS ER zt is 


G.DO8 1,5 GERRIT HILLEBRAND 





% 
5 PLA,2 
bd 
2 
ac. 
7 Pia 
PLL 
MeS7. ne 
e PL a3 
Le ze 
PL Lr3 
vest 
LAS 
Betr 
Pt 
” eur 
Ld E 
a PLAa 
: Pua 
ân. 
PLL 
By 
i PL 
É ui 
À PLL 
hu 


k.DOS 1,5 GERRIT HILLEBRRIND . ATOM NIEUWS PAG, 45 


GDOS 1.5 : commando's 





In dit verhaal wordt er een opsomming gegeven van alle GDOS 1.5 
commando's. 

tegende: drive nummer (B,1,2 of 3) 

track nummer (hex zonder #) 

sector nummer (hex zonder #) 

qualifier (ASCII karakter) 

load adres (hex zonder #) 

eindadres (hex zonder #) 

executie adres (hex zonder # 
Qualifier (ASXCII karakter) 

geheugen adres (zonder #) 

filenaam, maximaal 15 karakters 
eventueel met qualifier ( "q:<naam>" ) 


XD rt I 





mee 
<naam> 


Het hele systeem wordt opgestart met het commando: 


DOS afke. xD. 
Nu zijn alle GDOS 1,5 commando's te gebruiken. 

Alle GDOS commando's moeten worden voorafgegaan door een “e", 
Na een BREAK moet het GDOS opnieuw opgestart worden. 


AD —— 
Schakelt naar tè tracks mode, (default) 


ze + —— 
Schakelt naar 88 t-acks mode 


CAT mm afk se 
Dit comman:o zorgt voor het opslaan van de catalog van de met n 
gespecificeerde drive in het geheugen #2000-#2788 en schrijft 
alle gegevens op het beeldscherm. 

Voorbeeld: 

na #CAT @ [retur 1 


TITLE: GAMES-B1 FILES: 2 
DRIVE: 8 

BUALIFIER 

SECTORS FREE: 5 % 

DOUBLE DENSITY 


#HYPERF IGHTER aBJSGER TIME 


Hierbij is de di=c>ttenaam: GAMES-O1; HYPERFIGHTER en BURGER 
TIME zijn de ‘ilenamen. De schijf is in double-density 
beschreven. 

Het programma HYPERFIGHTER is gelocked (#) en het programma 
BURGER TIME heef. de qualifier "a" 

Het aantal sectoren wat nog vrij is, is 513. 


„COS —_— 
schakelt het cassette operating systeem weer in, zodat alle 
vectoren weer goed =taen voor b.v. COSI of FEOS, Om altijd te 


zorgen dat men de normaie boodschappen, zoals RECORD TAPE etc. 
krijgt, geef na een #7TOS het #MON commando. 
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DIR Mm —— 
Dit commando haalt een directory van schijf n naar binnen op 
#2807-#2788. Dát commando plaatst de catalog niet op het 
scherm! 


“DDP m —— 
Dit commando zet de double-density mode in werking en schakelt 
drive n voor. Het commando gegeven zonder drivenummer 


selecteerd de huidige drive. 


DELETE <naam afk DE - 
Dit commando haalt een filenam weg uit de directory. De file 

zal niet gewist worden indien het gelocked is. Heeft de file op 
schijf een qualifier, anders dan de huidige, dan zal deze 
qualifier in de ftlenaam meegegeven moeten worden of de 
qualifier kan bepaald worden met USE en SET. 


DRIVE m : afk. HDR. 
Dit commando selecteerd drive n. 

Drive @ is de orderkant van de eerste (dubbelzijdige) drive en 
drivel is de bovenkant. Drive 2 en 35 identiek als @ en 1 maar 

nu voor de tweede drive. 


SENABLE afk. EE 
Dit commando ‘enabled de gebruiker WIPE of FORMAT te 
gebruiken. 


*FOLDOUT tE mem afk. ak 
Dit commando ‘vouwt’ een gecomprimeerd opgeslagen tabel van een 
track formaat (tracknummer t), uit in het geheugen, beginnende 
bij mem. Indien ‘mem’ niet is opgegeven zaì hiervoor #2000 
gekozen worden. Laat men ook t weg, dan zal track nummer @ 
geselecteerd worden. Lees in dit geval 

FOLDOUT @ 2000 


FORMAT mm afk. “FOR - 
Dit commando formatteerd een schijf in de voorheen 
geselecteerde density in drive nummer n. 

Voor het uitvoeren van dit commando dient ween #ENABLE aan 
vooraf te zijn gegaan. 

Tijdens het formatteren worden de tracknummers hexadecimaal 
gedisplayed samen met het laatste adres uit het geheugen wat 

naar schijf is gestuurd. 

b.v: 

09: 5845 Bl: 5844 D2:5844 etc. 





„GO adress hand 
Dit commando is vergelijkbaar met LINK en zorgt voor het 
starten van een machinetaal routine op het adress (zonder #). 


HEL afk. HH 
Dit commando print een lijst van alle GDOS1.5 commando's, 
gevolgd door hun entry adres in de DOS. 


2 INFALL m afk “I. 
Dit commando geeft de gehele file-informatie van alle files op 
de geselecteerde discette. Geeft men geen drivenumer op dan zal 
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de huidige drive geselecteerd worden. 


HINFO <maam> hand 

Dit commando print de file-informatie van de opgegeven file 
volgens 

naam> 

loadadres execadres eindadres fielengte startsector 

vb. 

#HYPERF IGHTER 

2838 CEB& 5CAA 1400 A97 


KEEP Mm afk akad 
Dit commando copteert de directory van de geselecteerde schijf 
{vanaf de eerste 8 sectoren) naar de allerlaatste 8 sectoren 


van de discette. 
In het geval van: 
48 tracks t track 39, sectoren 9-16 
88 tracks : track 79, sectoren 9-16 
LET OP: alleen voor double density 


lt IB ee 
Identiek aan *CAT, doch nu wordt de catalog niet vanaf schijf 
gelezen maar rechtstreeks uit het geheugen. 


*LOAD <maam> CC 13 afk. se 
Met dit commando leest men een file van discette in het 
geheugen vanaf adres 1. Als het adres gebruikt wordt dat bij 
*SAVE is vastgelegd, kan 1 weggelaten worden. De volgende 
mutaties zijn mogelijks 

*LOAD "HYPERFIGHTER" 

*LOAD HYPERFIGHTER 

*LOAD "HYPERFIGHTER" 2808 

*LOAD HYPERFIGHTER 2800 


LOEK <maam> hndiennd 

Dit commando locked een file op schijf. Het dient vooral 
gebruikt te worden om ongewild wissen van de file te voorkomen. 
Voor een gelockte file wordt in de catalog een "#"” geprint. 


MON afk. em 
Met dit commando wordt iedere file-informatie bij iedere 
disc-bewerking uitgeprint. 

*NOMON 7 afk. HN 
Dit heft de werking van #MON weer op. 


“OSCI - ere 2515 afk. OD. 
Voor een voltedige beschrijving van dit commando verwijs ik 
naar het artikel "OSCLI" van Bram Poot ín AcornNieuws 4,4. 

Dit commando kan altijd gebruikt worden voor elk statement van 
GDDS 1.5, maar dient in het bijzonder om ster-commando's in 
basic-programma's uit te voeren die variabelen als parameters 
meekrijgen. Voorbeeld: 

Normaal kan niet: 

A=2 (grive nummer) #*DRIVE A 

Dit kan wel met OSCLI: 

*OSCLI "DRIVE"A,S15 

Sluit het OSCI commando altijd af met $13 (return) tt!!! 
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RECOVER afk. RE - 
Dit commando haalt de gecopieerde directory (t.g.v. KEEP) van 


schijf en schrijft deze vervolgens in de eerste directory. 
Blijf voorzichtig met dit commando. Files die na een KEEP op 
schijf zijn gezet, worden niet geupdate’ in de gecopieerde 
directory. Na een RECOVER zal dus de oude toestand weer bereikt 
worden. 


RENAME <maamlil> <maamz2>= afk. RE. 
Dit commando wijzigt de naam van een file (naami) in de nieuwe 
naam (naam2). Indien naam2 al bestaat zal het commando niet 
uitgevoerd worden. 


RSECT tt ss q mem afk … RS. 
Dit commando haalt sector(s) van schijf binnen, te weten: 
beginnende by sector s op track t. 

In totaal haalt het q sectoren binnen en plaatst deze achter 
elkaar in het geheugen beginnende bij mem. 


“RTRACK tt mem afk RTR. 
Dit commando haalt een volledige track van schijf in het 
geheugen (inclusief ID-markers, klokbytes etc.) . 
Indien mem niet is opgegeven zal voor mem #2000 gekozen worden. 
Laat men mem EN t beide weg, dan zal track @ geselecteerd 
worden, dus: 

*RTRACK B 2099 <--> *RTRACK 


RUN <naam afk. RR - 
Dit commando haalt de file met de opgegeven naam van schijf in 
het vastgestelde geheugen en wordt direct gestart, 


overeenkomstig zijn executie-adres. 


SAVE <naam 1 - Cx JJ afk. SS .- 
Dit commando dient voor het opslaan van een file <naam>, vanaf 
adres 1 tot aan adres e, met als startadres x. Dit startadres 
hoeft niet opgegeven te worden, in dit geval wordt het 
startadres gelijk gesteld aan de eerste geheugenlocatie (1). 
Als <naam> al op de schijf staat en niet met een qualifier 
beveiligd is, dan wordt de nieuwe file over de oude 
heengeschreven. Deze laatste gaat dan verloren. 

De directory zal worden aangepast en gesaved worden op schijf, 
“sD mm . | 

Dit commando schakelt over naar single-density en drive n. 


“SET k 

Met dit commando wordt de qualifier veranderd en waarbij k elk 
ASCII karakter mag zijn. 

Nieuw aangemaakte files worden automatisch met deze qualifier 
weggeschreven. Na *DOS is de qualifier altijd een spatie. 


TITLE < t—-maam> afk. TT 
Met dit commande wordt de titel van de schijf veranderd in de 
eerste 14 karakters van <t-naam>. Indien de naam kleiner is dan 
14 karakters, dan wordt de rest opgevuld met spaties. 

Ook is mogelijk om control-karaktrs in de titel op te nemen. 
Dus de naam vooraf laten gaan door Ctri-t zal bij elke *CAT of 
«LIB het beeld schoon maken. 
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UNLOCK <maam> afk LIN 
Dit cemmando zal de file <naam? ge‘unlocked’ worden. Het is in 
feite het reset commando voor LOCK, 


USE k afk. LJ 
Met dit commando is het mogeijk om files met een andere 
qualifier dan de huidige, te gebruiken. De oude qualifier 
blijft geldig. : 
Twee maal achtereen het opgeven van #USEk (met dezelfde 
qualifier) heeft hetzelfde effect als #SETk. 

Makkelijker is het gebruik van qualifiers in de filenaam: 
a:naam. 


VERIFY Mm afk. VV 
Dit commando verifieert een gehele schijfkant in drive nn. 
Indien een track onbetrouwbaar wordt bevonden, zal achter het 
tracknummer een vraagteken geprint worden. 


HWIPE mm afk - sei - 
Dit commando wist een directory in drive nn. Dit ‘wipen' zal 
alleen uitgevoerd worden indien deze faciliteit ge‘enable'd is, 
Na het wissen zal de directory leeg zijn, d.w.z. TITLE=spaties, 

B files. 

Heb Je er spijt van en de directory was gecopieerd via KEEP, 
dan zaì RECOVER nog de oude directoy herplaatsen. 


WWSECT t s q me nn afk IS 
Dit commando schrijft q sectoren beginnende bij sector s op 
track t naar schijf vanaf het adres mem. 


HUWTRACK tt mem afke LT 
Dit commando schrijft een track formaat, welke uitgevouwen is 
vanaf geheugenadres mem naar track t op de geselecteerde drive, 
Indien mem niet opgegeven wordt, dan zal hiervoor #2098 gekozen 
worden. Wordt t ook niet opgegeven, dan zal track @ 
geselecteerd worden. 
Laat men dus zowel t EN mem weg, lees dan: 

WTRACK @ 2008 


“<maam> nand 

Als een stercommando gebruikt wordt wat hierboven niet genoemd 
is, dan zal het als een #RUN opdracht uitgevoerd worden, Het 
systeem neemt aan dat drive @ bedoeld wordt en dat de qualifier 
voor de naam een spatie is. 

Op deze manier kan een filenaam een commando worden. 

B. v. #SNAPPER of #SQUEEZE 
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GDOS 1.5 foutmeldingen 





NAME OF FILE”? errornr: 56 

Indien de opgegeven file de 15 karakters overschrijdt of de 
filenaam is voorafgegaan door een dubbele quote maar hiermee 
niet ís afgesloten, dan zal deze foutmelding gegeven worden. 


SYNTAX 7? errornr: 81 
Indien een commande niet is afgestoten met "5" of een [return] 
zaì deze foutmelding gegeven worden. 


UNKNOWN DRIVE NUMBER errornr: 281 
Bij elk drivenummer ongelijk aan 8,1,2 of 5 zal deze melding 
kenbaar worden gemaakt. 


FILE PROTECTED ervornr: 129 

Een file welke ge’tock'ed is, zal niet gedelete’ of vervangen 
kunnen worden door een nieuwe file onder dezelfde naam. 
Bovenstaande foutmelding is het resultaat. 


FILE NOT FOUND errornr: 48 

Een file opvragen welke niet op schijf staat, of een qualifier 
heeft die niet overeenkomt met de huidige qualifier, wordt 
beloond met bovenstaande uitspraak. 


COMMAND NOT YET SUPPORTED errornr: 3 
Het spreekt voor zich. Commando welke opgegeven is, bestaat 
(nog) niet. 


FATAL SEEK ERROR TRACK: t errornr: 143 

De track t is niet gevonden. De oorzaak kan zijn: een 
ongeformatteerde schijf, verkeerde density selectie of 60/40 
tracks drive-discette verschil. 


CRC errornr: 44 

CRC faut. Oorzaak: kapotte schijf (slecht lopende schijf in 
behuizing) ef een klokfout. Meestal helpt het om hetzelfde 
commando nogmaals los te laten. Is het echt niet te redden, 
probeer dan met RSECT of RTRACK te redden wat er te redden valt 
om daarna met FOLDOUT en WTRAEK de track er opnieuw op te 
zetten. 


BAD DATA ervrornr: 635 
Klokverschuivingen in de hardware is hier meestal de oorzaak 
van. Zie CRC. 


FACILITY NOT ENABLED errornr: 97 
FORMAT en WIPE geprobeerd, zonder een ENABLE vooraf geeft deze 
foutmelding. 


WRITE PROTECTED DISC errornr: 197 
Schrijfoperaties naar een beveiligde schijf (zo'n stickertje 
aan die uitsparing weet je wel) zullen beloond worden met deze 


melding. 
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WRITE FAULT TR:t SCT:s errornr: 249 
Schrijffout in sector s op track t. Oorzaak kan een kapotte 
sector zijn. Zie CRC. 


RECORD NOT FOUND TR:t SCT:s errornr: 249 

Sector s is niet gevonden in track t. Oorzaak is: verkeerde 
density selectie of een foutief sector nummer bij RSECT en 
WSECT. Gok kan een kapotte sector en/of track de oorzaak zijn 
van deze foutmelding. 


NO SECTORS? errornr: 131 
Voor het aantal sectoren ín de commando's RSECT en WSECT ís @ 


opgegeven. 


MAXIMUM ACCOUNT ON DISC errornr: 192 
Het maximum van 78 files op een schijfkant is bíj deze 
foutmelding bereikt. 


NQ ROOM ON DISC errornr: 75 
De te saven file past niet meer op schijf teen tekort aan 


sectoren). 


NAME NOT UNIQUE errornr: 57 

Indien men een file wil renamen en de nieuwe naam bestaat al op 
de bewuste schijf, dan zaì bovenstaande foutmelding gegeven 
worden. 


Noot: Voor alle foutmeldingen zijn de errornummers uit het 
zeropage adres #F@ (RETRIES) te halen. 
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GDOS 1.5 de source 





In dit hoofdstuk wordt de source van GDOS 1.5 besproken, zodat 
iedereen kan begrijpen (hoop ik) hoe de hele zaak werkt. Met de 
opgedane kennis is het dan mogelijk om zelf uitbreidingen, of 
veranderingen aan te brengen. 

NOODKREET: blijf COMPATIBLE 


De verklaringen van de routines gaan vergezeld van de adressen 
in de oorspronkelijke (gereleasde) versie van GDOS 1.5 en van, 
indien mogelijk een vergelijking in de oude Acorndos ROM en/of 
Decados. 


Algemene equates source regel 168-220 


entry: —— vergelijk — 
CR = carriage return 
LF line feed 





SPACE spatie 

DUBQUOTE = dubbel quote 

NML.NG = maximale lengte filenaam (15) 

BEGINSCT = beginsector op schijf van de eerste file (na 
directory) 

NMBFILES = maximale aantal files per schijfkant 


:zeropage locaties source regel: 248-540 


entry: —— vergelijk —— 
NAME (9A) = vector naar de naam van de file 
LDADR (9C) load adress 





PEXEADR (9E) executie adress 

FILELEN (AO) = file lengte (LSB) 

MSB (A2) = bits 8-3 start sector (MSB) 
bits 4-7 file length (MSB) 





STSCT (AS) start sector (LSB) 

ENBIND (A4) enable indicator 

FNM (AS) filename geheugen 

“CGUAL (B4) huidige qualifier 

TEMP1 (B5) tijdelijk gebruikt geheugen 
TEMPZ (B7) idem 

VTEMP (B9) idem, binnen t routine 

WORK (BB) werk adress 

SCTLEFT (BD) aantal sectoren te gaan voor de FDC 
BCUAL (BF) back up qualifier 

NMI (D5) NMI interrupt routine pointer 
OSTEMP (D7) tijdelijk gebruik in OSCLI 

TEMP (E9) tijdelijk single byte 

MSGPNT (EA) pointer naar te printen message 
DTRCK (EE) desired track 

DSECT (ED) desired sector 

DRNMB (EE) drive number 


MONFLAG (EF) 
RETRIES (FG) 
DSTATUS (F1) 
DENSITY (F2) 
TYPE (F3) 


MON/NOMON indicator 

aantal retries voor de FDC na error 
status register backup 
single/doubie denity indicator 

type commando 

DCOM (F4) desired FDC commando 

HSTSPT (F5) sectors per track (18 of 16) 

MEM (F6) = memory pointer 

NTRC (FB) aantal tracks per schijf 
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:FDC commandos source regel: 560-650 

entry: —— vergelijk ——- 

STEPRATE = zie tekst 

FDC1797 = status gebruikte chip (1797=1, 1793=0) 
RESTC = restore commando 

SEEKC = seek commando 

RSCTE = read sector commando 

WSCTC = write sector commando 

RTRCC = read track commando 

WTREC = write track commado 

RDRSC = read adress commado 

STPIC = step-in commando 

:1/0 en monitor source regel: 670-810 

entry: =— vergelijk —- 

STATUS = status register FDC 

CMD = commando register FDC 

TRACK = track register FDC 

SECTOR = sector register FDC 

RDATA = data register FDC 

RDDA = data direction register PIA 

RDA = input/output register port-A PIA 
RA = data register port A PIA 

RDDB = data direction register port-B PIA 
RDB = input/output register port-B PIA 
RB = data register port-B PIA 

SKIPSPE = skip spaces in command line 
LFPRINT = entry voor printen van een linefeed 
PCHPRIN = print ascii character 

DELAY = vertraging 

: DOS source regel: 838-106@ 
entry:E8D8 vergelijk Acorndos: E@90-E60C 


{disc operating system) 
Dit ís de main entry van het comando #DOS. 
Het initialiseert de FDC en de PIA in de juiste I/O richting en 
zet verschillende default waarden. 
De message 
GDOS 1.5 

wordt geschreven en vectoren worden omgezet, te weten COMVCT en 
NMIVCT. 
Defaults: double density 

drive @ 

40 tracks 

qualifier ‘spatie’ 


: MESSAGE source regel:1080-1178 
entry:EGAC vergelijk:Acorndos E@16-EQ50 
(print message) 
Deze routine print een message op het beeld (en/of printer). 
Interface: JSR MESSAGE 

„BYTE "tekst" ,CR,LF 

NOP \waarde >#80 
In het zeropage adres ‘RETRIES' is een soort sumcode opgeslagen 
na het printen, welke uniek Is voor elke message. Hierdoor is 
het mogelijk om foutnummers op te vragen in een programma welke 
altijd gelijk zijn ongeacht de plaats waar de code in het 
geheugen is geassembleerd. 
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: READNAME source regel:1198-1218 

entry:E091 vergelijk Acorndos: EO33-E040 

(read name) 

Deze routine leest een filenaam binnen van de command lijn ——> 


zero page via de routine STRBUFF FILL op #188 en verder. 


:STRBUFF ‘FILL source regel: 1230-1550 

entry:EBIF vergelijk Acorndos: EO41-E067 

(fill string buffer) 

Eigenlijke filenaam leesroutine. Het checkt of de filenaam is 
ingesloten d.m.v, dubbele quotes en leest de filenaam binnen op 
#149 en verder. 


1 STORELOCAL source regel: 1350-1500 
entry:EOC6 vergelijk Acorndos: E£068-EOSE 
(store name local) 
Deze routine copieert een filenaam vanuit zeropage naar de 
eigenlijke naamgeheugen (z.p. NAME), Hierbij checkt de routine 
ook nag of een qualifter is meegegeven, zoals b.v. 
“a: TEST" fitenaam TEST met qualifier ‘a’ 
Zo ja, dan wordt de qualifier tijdelijk omgezet. 


: GUOTEPART source regel:1550-1500 

entry:E18Á vergelijk Acorndos: EUSF-EOB3 

{check on quotes) 

Deze routine leest een filenaam in, die is ingesloten met 


dubbele quotes. Klopt de syntax niet, dan wordt de foutmelding 
NAME OF FILE? 
gegeven, gevolgd door een break-exit 


:STR'DELMT source regel: 1619-1700 
entry:E157 vergelijk AcornDos: ESC9-ESD2 
(string delimiter) 
Haalt een filenaam plus de adressen binnen en checkt of het 
totale commando is afgesloten met een —"- of een —return-. 
Zo niet, dan wordt de message 
SYNTAX7 


geschreven, gevolgd door een break exit. 


: PSV source regel:1720-1790 
entry:sEi51 vergelijk AcornDos: ESE6-EG12 
(save) 


Main entry van het commando #*SAVE 


z NOMON source regel: 1819-1878 
entry:E17D vergelijk AcornDos: E459-E464 
(nomon) 


Main entry van het commando #NOMON 


z MON source regel: 1859-1878 
entry:E17F vergelijk AcornDos: E45B-E464 
{mon) 


Main entry van het commando *MON 


: DRIVE source regel: 1599-2018 
entry: E189 vergelijk AcornDos: E42A-E44E 
(drive) 


Main entry van het commando #*DRIVE 
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: LODVCT source regel: 2039-2040 
entry:E1C8 vergelijk AcornDos: E477-E4B5 
(load vector) 

Main entry van het commando LOAD 


zREALLD source regel: 2088-2170 
entry:EID3S vergelijk AcornDos: E484-E4C4 
(real loading) 
Deze routine haalt daadwerkelijk de data van schijf binnen. 
De actie volgorde is: 
-load adres 
=file informatie schrijven 
-kop restore 
„bereken begin= track en sector 
-lees data 


:TITLE source regel: 2198-2280 
entry:E1FS vergelijk AcornDos: E578-E596 
(title) 

Main entry van het commando #TITLE 

: DELETE source regel: 2388-2320 
entry:E21C vergelijk AcornDos: E41A-E429 
(delete) 


Main entry van het commando #DELETE 


:REMDIR source regel: 2349-2500 
entry:E228 vergelijk AcornDos: E18C-E1A9 
(remove from directory) 
Deze routine wist een filenaam, plus zijn adressen uit de 
directory. Het aantal files= oud aantal-1l, 
Indien de file ge ‘locked’ is zal de foutmelding 
FILE PROTECTED 
geprint worden. 


interface: (TEMP1) pointer filenaam 


(TEMP2) pointer file info 
2 CAT source regel: 2520-2940 
entry:E277 vergelijk —-— 


(catalog) 
Main entry van het commando #CAT 


:CIB source regel: 2548-2940 
entry:E27A vergelijk —— 
library) 


Main entry van het commando *LIB 


:PCHFILE source regel: 2960-3098 
entry:E37E vergelijk —— 

(print characters of filename) 

Deze routine print de naam van de file (15 karakters). 


:PRINTSPACE source regel: 5020-5050 
entry:E3BB vergelijk Acorndos: EGEC-EOF@ 
(print a space) 

Deze routine print een spatie. 
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REPORT source regel: 3070-5240 


L lijk A 1 E22 
ELESTA tormation) “79e ij cornDas: E1BB-EZ22 


Deze routine print de gegevens van een file: 
interface: (TEMP1) = pointer naar de fílenaam 
(TEMP2) = pointer naar de file info 

Eerst wordt gekeken of de file gelocked Is. Zo ja, print '#' 
dan: =print qualifier 

-print filenaam 

=1&% spatie 

=print load adres 

-print executie adres 

=print eind adres 

-print file lengte 

=print begin sector (absoluut) 








1 LOOKUPNAME source regel: 52468-35520 
entry:E4QF vergelijk AcornDos: E149-EI1SC 
{look-up name) 
Deze routine zoekt in de directory naar een filenaam. 
Resultaat: — carry set z OK 
—- carry clear 5 file niet gevonden 
met foutmelding 
FILE NOT FOUND 


1’ TRSC source regel: 5540-5490 
entry:E45@ vergelijk AcrnDos: E112-E148 
(calculate track and sector) 
Deze routine berekent de begintrack op een schijf van de 
opgegeven filelengte in (FILELEN) 
Resultaat komt in: SCTLEFT aantal sectoren te gaan 
DSECT start sector 
DTRCK start track 
Hierna zal via de routine SEEK de bewuste track opgezocht 
worden. 


: SHIFTRIGHT4 source regel: 3519-5560 

entry:E46B vergelijk AcornDos: E@FB-EBFF 

(shift accu right 4 times) 

Shift de accu 4 keer naar rechts (linker =-> rechter nibble) 


LOCK source regel: 3580-5658 
entry:E470 vergelijk AcornDos: ES599-ESAE 
(lack file) 

Main entry van het commando #*LOCK 





z UNLOCK source regel: 5609-3650 
entry:E471 vergelijk AcornDos: ES59A-ESAE 
(unlock file) 

Main entry van het commando #UNLOCK 


1 'EXLD source regel: 5670-5789 

entry:E487 vergelijk AcornDos: EUB4-E0EB 

(calculate exec and load adress) 

Deze routine berekent uit de opggeven ASCII karakters in een 
commando regel, de numerieke waarde (2 bytes). 

De naam van de routine is eigenlijk misleidend, want ‘EXLD+2 
zet de berekende waarde in geheugenplaatsen, welke overeenkomen 
met @,X. 
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Dus in het X register staat het absolute adres waar de waarde 
neergezet moet worden. Wordt veel gebruikt! 


z AUTOSTART source regel: 3880-3950 
entry:E4BF vergelijk AcornDos: E4C5-£4E7 
(auto start) 
Main entry van alle #*-commando's, welke niet in de DOS tabel 
staan (TABLE). 7 
Indien een commando niet in deze tabel is te vinden, zal deze 
routine trachten de file onder de bewuste naam van schijf te 
halen en te executeren op het corresponderende startadres. 
Bevindt de file zich niet op schijf, dan volgt: 

COMMAND NOT YET SUPPORTED 


1 RUN source regel: 3952-5980 
entry:E515 vergelijk AcornDos: ESOA-E515 
(run) 


Main entry van het commando #RUN 


: PLD sourceregel: 4200-4080 
entry:ES1E vergelijk AcornDos: E£465-E476 
(laad) 


Main entry van het commando #LOAD 


:USE source regel: 4100-4140 
entry:E53@ vergelijk AcornDos: ESAF-ESBC 
(use qualifier) 

Main entry van het commando «USE 


2SET source regel: 4160-4180 
entry:ESSE vergelijk AcornDos: E572-E577 
(set qualifier) 

Main entry van het commando #SET 


:G0 source regel: 4200-4240 

entry:E544 vergelijk AcornDos:. ES65-E571 
Decados regel 560-518 

(go) 

Main entry van het commando #*GO0 

s HELP source regel: 4260-4430 

entry:E5S53 vergelijk —— 


(print help information) 
Main entry van het commando #HELP 


z COMVCT source regel: 4450-4600 
entry:ES9G vergelijk AcornDos: E3ES5-E419 
tentry commands and vectors) 

Main entry van elk #-commando 

Maakt gebruik van TABLE 


: TABLE source regel: 4620-5598 

entry:ESDS vergelijk AcornDos: E36C-E3E4 

(table of commands) 

Bevat alle commando's (.ASCII) plus hun entry adressen in de 
DOS (.DBYTE) 

Alle uitbreidingen dienen voor AUTOSTART geplaatst te worden. 
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2 PCUHPRESENT source regel: 5419-5570 
entry: E6CS vergelijk AcornDos: E1SD-E18B 
(check 1f present) 
Deze routine haalt de directory naar binnen en controleert of 
de file zich op de schijf bevindt. 
Zo ja, set carry. 
Zo neen, clear carry. 
interface: FUNM ——> FLNM+14 = filenaam, 


1PNTUP source regel: 5590-5668 

entry:EGFE vergelijk —— 

(pointer up) 

Deze routine verhoogt de pointers welke normaal gebruikt worden 


voor manipulaties in de directory: 


(TEMP1) = (TEMP1)+16 pointer naar fíilenaam 

(TEMP2) = (TEMP2}+8 pointer naar file info 
1 PNTDOWN source regel: 5480-5758 
entry:E71B vergelijk —— 


(pointer down) 
Idem als bij PNTUP, doch nu het verlagen van de pointers. 


:POINTSETUP source regel: 5778-5820 

entry:E7368 vergelijk —— 

(pointer set-up} 

Deze routine initialiseert de manipulatie pointers TEMP1 op 
#2018 en TEMP2 op #2500 


2 NMINI source regel: 5849-5890 
entry:E74B vergelijk —— 

(initiate NMI) 

Initiatie jump setup van de NMI. 


2 NMIROUT source regel: 5919-5930 

entry:E75A vergelijk —— 

CNMI handling routine) 

Deze routine handelt de NMI interrupt af. Er wordt zodanig met 


de stack gerommeld, dat bij het verlaten van deze routine het 
opgegeven adres in een willekeurige routine als eerste 
uitgevoerd wordt. 

werking: 


routine x 
lo. adres na NMI ——-> NMI 
h.o. adres na NMI —-> NMI+1 


FDC commando 


klaar, —-> interrupt ——> NMIROUT 








> JMP (NMI) 


z HEADUP source regel: #089-6070 

entry:E778 vergelijk —— 

(head up and restore} 

Deze routine wordt vaak uitgevoerd na een FDC commando: 
drivekop omhoog (als dat kan) en kop terug naar track. 


2STEPIN source regel: 6090-6170 
entry:E78A vergelijk — 
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‘step in) 
Deze routine verzorgt het eenmaal naar binnen steppen van de 
drivekop. 


zRESTORE source regel: 6198-4290 

entry:E79E vergelijk -— 

Deze routine verzorgt het ‘restoren’ van de kop, d.w.z. naar 
track®. 

: SEEK source regel: 6318-6390 

entry:E7BD vergelijk —— 


(seek. track) 
Deze routine zoekt een track op de schijf. 
interface: huidige track ín TRACK register 
verlangde track in DTRCK 
JSR SEEK 


:RD‘SECT source regel: 6410-6618 
entry:E7D9 vergelijk -— 
(read sectors) 
Deze routine leest een aantal opgegeven sectoren van schijf in 
het geheugen (vanaf de huidige track). 
Interface: SCTLEFT = aantal te lezen sectoren 
DSECT start sector 
{LDADR) = load adres in het geheugen 
Noot: DSECT dient het sector nummer te bevatten welke 
sequentieel geteld is vanaf sector 1, track @ (absolute 
sectornummer) . 
Dus sector B, track 2 —-> DSECT=#28 





zWR'SECT source regel: 6630-6850 

entry:E819 vergelijk —— 

(write sectors) 

Idem aìs RD'SECT, doch nu voor het schrijven van sectoren. 
Interface identiek. 


zERR'TYPEI source regel: 6870-7020 
entry:EBSC vergelijk —- 
terror handling typel commands) 
Deze routine analiseert het status-register van de FDC op 
fouten. Is er een fout opgetreden, dan wordt het aantal retries 
(5) met 1 verminderd en de carry geset. Bij geen errors wordt 
de carry gecleared. 
Indien de FDC vijf keer de kans heeft gehad (restries=0), dan 
zal een fout geprint worden, afhankelijk van de oorzaak. 
fouten: 

FATAL SEEK ERROR 


CRC ERROR 
: WRPROT source regel: 7840-7100 
entry:EBAS vergelijk —— 


(check on write protected disc) 

Deze routine bekijkt het status-register om te zien of de 
schijf waarop een schrijfactie moet plaats vinden, 
ge ‘protected’ is. Zo ja, dan volgt er een foutmelding. 


zERR'TYPE2 source regel: 7128-7540 
entry:E8CS vergelijk =-— 
terror handling type2 commands) 


PAG.60 ATOM NIEUWS É G.DOS 1.5 GERRIT AILLEBKHAD 


Idem als ERR'TYPE1, doeh nu voorFDC type 2 commando's. 
Fouten: 
WRITE FAULT 
RECORD NOT FOUND 


ERC ERROR 

BAD DATA 
1 FORMAT source regel: 7560-7640 
entry:E942 vergelijk —— 


(format disc) 
Main entry van het commando #FORMAT 


zWIPE source regel: 7668-7698 
entry:ESD2 vergelijk =—- 

(wipe directory) 

Main entry van het commando #WIPE 


: TRINP source regel: 7718-7770 
entry:ESDE vergelijk — 
(track input handling) 

Deze routine wordt gebruikt bij het commando RTRACK en WTRACK. 
Er wordt gecheekt op een tracknummer invoer. Is deze er niet, 
dan trackB. Anders wordt de bewuste track opgezocht. 





* TRPAR source regel: 7790-7898 
entry: ESED vergelijk —— 
(track parameters input) 
Deze routine leest 2 parameters. 
Resultaat: parameter 1 in FLNM 

parameter 2 in FLNM+1 en FLNM+2 
Indien FLNM+2=9, dan geen geheugen invoer: 


(MEM) =#2000 
altijd: (DTRCK)=(FLNM) 
2 WTRACK source regel: 7918-7920 
entry: EAGE vergelijk —— 


(write track) 
Main entry van het commando #WTRACK 


z SWRTTRC source regel: 7940-8098 
entry:EA14 vergelijk —- 
{subroutine write track) 
Deze routine schrijft een complete track naar de disc volgens 
de interface: 
(MEM) = start adres 
DTRCK = verlangde track 
Na het schrijven wordt het adres van het laatst geschreven byte 
geprint. 


1 RTRACK source regel: 8110-8208 
entry: EA4A vergelijk —— 

{read track) 

Main entry van het commando #RTRACK 


2PFLD source regel: 8229-5230 
entry: EA7G vergelijk —— 

(foidout command) 

Main entry van het commanda #FOLDOUT 
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s FOL DOUT source regel: 8259-8610 

entry:EA73 vergelijk —— 

(foldout track format) 

Dit is de uiteindelijke ’foldout routine, die een 


gecomprimeerde track formaat tabel uitklapt in het geheugen. 
interface: DENSITY = @/1 (B=double, 1=single) 


(MEM) = startadres van het geheugen waar de track 
moet beginnen 
DTREK = verlangd track nummer 
: TRFORMS source regel: 8638-8798 
entry:EBi9 vergelijk — 


(track format single density) 
Dit is een gecomprimeerde tabel voor een track in single 
density. 
Wijzig hier niets aan !! 
items: „WORD xxyy 
xx = byte in het track formaat 





yy = aantal maal xx (@8=256) 
xx = DD --ò track nummer 
xx = CC ==> sector nummer 
xx = 65 —-> einde tabel (yy=byte) 
: TRFORMD source regel: 8810-9058 
entry:EB37 vergelijk —— 


(track format doubìe density) 
Idem als TRFORMS, doch voor doudle density. 


: INTERL 'S source regel: 9850-9040 

entry:EB61 vergelijk -=— 

(interleave sequence single density) 

Dit is de sector-interleaving tabel voor een track in single 
density. Tabel moet beginnen met 8. 


z INTERL'D source regel: 9079-9250 
entry: EBAC vergelijk —— 
(interleave sequence double density) 

Idem als INTERL'S, doch voor doubie density. 


z VERIFY source regel: 9108-9568 

entry: EB7D vergelijk —— 

(verify disc) 

Main entry voor het commando #VERIFY 

noot: bij single density dienen 6 sectoren gevonden te zijn en 
bij double density moet dit aantal 12 zijn voor een positief 
resultaat. 


z PARAM source regel: 9580-9670 

entry:EC4S vergelijk —— 

‘parameter input) 

Deze routine leest de parameters voor de commando's RSECT en 
WSECT. Doch voor ieder ander nieuw commando zijn deze entries 
ook te gebruiken. 

Na een JSR PARAM zien de gebruikte adressen er als volgt uit: 
DTRCK = FLNM track nummer 

SCTLEFT= FLNM+1 sector nummer 

DSEET = FLNM+2 aantai sectoren 

(LDADR > LELNM+ 3) start adres 


Kona 
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Indien de inhoud van FLNM+2=@, dan zal de foutmelding 

NOD SECTORS? 

geprint worden, 

Na het lezen van de parameters zal de verlangde track opgezocht 


worden. 


: NOSECT source regel: 9698-9720 

entry:EC7S vergelijk —— 

tno sector error) 

Fout melding NO SECTORS? printen, gevolgd door een break. 


:RSECT source regel: 9740-9750 
entry:EC82 vergelijk —— 

(read sectors) 

Main entry van het commando #*RSECT 


:WSECT source regel: 9770-9780 
entry:EC89 vergelijk -— 

(write sectors) 

Main entry van het commando #WSECT 


: INFO source regel: 9880-9820 
entry:EC9@ vergelijk AcornDos: E1B2-E1BA 
(information) 


Main entry van het commando #INFO 


: ENABLE source regel: 9840-9870 
entry: EC99 vergelijk —— 

(enable wiping and formatting) 

Main entry van het commando #ENABLE 

Noot: enabling-—> ENBIND=#4E 


z MERREFULL source regel: 9890-9920 
entry:ECAi vergelijk AcornDos: ESDE-ESES 
(error message disc full) 
Deze routine print de error message 

MAXIMUM ACCOUNT ON DISC 
d.w.z. er zijn reeds 78 files in de directory. 


: PADAPTCAT source regel 99405-10470 
entry: ECBF vergelijk AcornDos: EGIA-EGAC 
(adapt catalog) 
De lastigste routine uit GDOS. 
Deze routine past de gehele directory aan ten behoeve van het 
saven van een file. 
Indien de fìlenaam reeds bestaat wordt de oude uit de directory 
gehaald en komt deze ruimte weer vrij. Daarna wordt de lengte 
van de file berekend. Daarna wordt gekeken of er reeds 78 files 
op e schijf staan. Zoja, dan wordt via MERRFULL dit te kennen 
gegeven en de DOS verlaten. 
De directory wordt nu via EXAMROOM bekeken of er wel genoeg 
sectoren vrij zijn voor de te saven file. Zo neen, dan volgt de 
error-message 

NO ROOM ON DISC 
De oude directory blijft bestaan. 
Is dit allemaal goed doorlopen, dan zal de start- sector, track 
en de lengte van de file op de schijf berekend worden. Tevens 
wordt gekeken of de file in een leeg gedeelte (t‚g-v. deleten) 
van de directory past. 
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Resultaat: start sector, track en lengte. 

Hierna zal de directory zodanig opgeschoven worden (regel 
18230-18378) dat de nieuwe filenaam eringeplaatst kan worden. 
Het einde van het verhaal is dat het aantal files op de schijf 
aangepast wordt. (regel 18458-10460) 


s SAVVCT source regel: 18498-10550 
entry:EDB9 vergelijk AcornDos £SE6-E612 
(save vector) 

Main entry van het commando SAVE 


2 EXAMROOM source regel: 10550-12610 
entry: EDCA vergelijk AcornDos: ES19-E337 
(examine room on disc) 
Deze routine onderzoekt de directory op vrije ruimte voor een 
file. 
Benoeg ruimte = set carry 
geen ruimte = clear carry 
Interface: (TEMP2} = adres in directory van eerst gevonden 
vrije ruimte 
(FILELEN) = file lengte 
Noot: (TEMP2) blijft ongewijzigd. 


1 INFALL source regel: 19659-10700 
entry: EDEB vergelijk —— 

(information all files) 

Main entry van het commando #INFALL 


zDIR source regel: 10720-10760 
entry: EEOB vergelijk AcornDos: E231-E236 
‘director y) 

Main entry van het commando #DIR 


1: READTRACKÒ source regel: 19780-10830 

entry:EEIS vergelijk —— 

{read directory from track@) 

Deze routine haalt een directory van schijf en plaatst deze in 
#2000-#2780 


s SAVE TRACKS source regel: 18850-14959 

entry:EE28 vergelijk —— 

‘save directory on track®) 

Deze routine schrijft de directory van #2000-#2788 op schijf. 
Density en drive afhankelijk waarden worden nog ingevuld (zie 


HOS,LOS,HOD en LOD). 


*HOS,LOS,HOD,LOD source regel: 11000-11070 

entry:EE6GS vergelijk —- 

(ho. en l.o. values of sectors per disc) 

Deze tabellen bevatten het aantal sectoren per schijfkant, 
welke afhankelijk zijn van een 48- of 89 tracks drive en de 
geselecteerde density. 

48 tracks SD 592 sectoren per kant vrij 

48 tracks DD 632 sectoren per kant vrij 

838 tracks SD 792 sectoren per kant vrij 

AA tracks DD 1272 sectoren per kant vrij 
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:PSD source regel: 11890-11140 
entry:EEGB vergelijk —-— 

(single density) 

Main entry van het commando *SD 


:PDD source regel: 11168-11218 
entry:ER7F vergelijk —— 

tgouble density) 

Main entry van het commando #DD 


:KEEP source regel: 11250-11290 
entry:EE9S vergelijk —— 

(keep directory) 

Main entry van het commando #KEEP 


+ RECOVER source regel: 11510-11570 
entry: EEAE vergelijk == 

(recover directory) 

Main entry van het commando #RECOVER 


z TRESETUP source regel: 11390-11458 , 
entry:EECS vergelijk —— 

(track B data set-up) 

Deze routine vult initiaties voor directory manipulaties (saven 
en laden) 





start sector = 1 

start track 2 

aantal sect. 8 

loadadres = #2900 
1 FOUR source regel: 11470-11510 
entry:EED7 vergelijk —— 


‘set fourty tracks mode) 
Main entry van het commando *#40 


zEIGHT source regel: 11538-11578 
entry:EEEB vergelijk —— 

(set eighty tracks mode) 

Main entry van het commando *#88 


1 RENAME source regel: 11598-11778 
entry:EEFS vergelijk Decados: regel 698-760 


(rename file) 
Main entry van het commando #RENAME 
Noot: indien de file reeds bestaat (onder dezelfde qualifier) 
wordt de foutmelding 
NAME NOT UNIGUE 
gegeven gevolgd door een break. 


+0SCLI source regel: 11798-11998 

entry:EFSD vergelijk OSCLI commando van Bram Poot 
(OS command Jine interpreter) 

Main entry van het commando #OSCLI 


: PCOS source regel: 12810-12060 
entry:EFB8 vergelijk Decados: regel 770-800 
‘cassette operating system) 

Main entry van het commando #*COS 
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Tet slot de opbouw van de directory in het geheugen: 


2008 — 282D TITLE van de disc 
20BE density (@zdouble, i=single) 
20ar aantal files op schijf 


(tel steeds 16 bij de volgende adressen op voor elke extra 
file) 
2918 — 201E file naam (15 karakters) 
281F bits 8-6: qualifier 
bit 7 : 1 als gelocked 


(tel steeds B bij de volgende adressen op voor elke extra file) 
2500 — 2521 load adres 

2502 — 25835 executie adres 

2504 - 2505 file lengte (LSB) 


2506 bits 8-5 : file start sector (MSB) 
bits 4-7 : file lengte (MSB) 
2507 file start sector (LSB) 


De directory op schijf: track @ sector 1-8 (alleen double 
density) 

Keep directory 48-tracks: track 39 sector 9-16 

Keep directory B@-tracks: track 79 sector 9-16 





Check it! Chuck it! There's gotta be a bug! … 
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ACORN TO GDS 


HCORH-TO-GDOS GERRIT HILLEBRAND 


INFORMAT ION: 

START: #2900, END: #2F7F, LENGTH: #067F (= 1665) 

#LINES: &2, LAST LINE: 620, #PAGES: 1 

LONGEST LINE: 140 (= 67 CHAR'S) 
10 PROGRAM ACORN-T0-5D0S 320 605,2 
20 330 De2564EIROCOEF HERB) K1SH4? (AOCOF+{TEB) } 
30 REK:DIT PROGRANNA COPIEERT EEN SCHIJF, GESCHREVEN 340 Ked/10pLeD10;N=t0-t 


AO REK:MET DE OUDE ACORNDOS, NAAR EEN IN DOUDLE-DENSITY 

50 REN: BEFORHATTEERDE SCHIJF 

60 

0 15520; 7362182 

BO DIN 5531) „DOCS „ALIS) 

90 FOR 120 TO 31;DIN B7;851=BN. 

100 FOR 1=0 TD S15DIN B15;001=8;N. 

110 F=0;P.$12"***ACORN DOS TO 6005 1,5°" 

120 IN.“WEICH DRIVE CONTAINS*'*THE OLD ATOM DISC*8 

130 IN. “WATCH DRIVE CONTAINS" "THE DD DISC*H 

140 IF (642) DR (BeHeZ AND B=ll OR (6+H=4 AND E22) OR 18404 
NFel 

{50 BDS, 

160 sRSECT 0 0 2 0B0O 

170 COPY. 80800, 80007 ,#2800;CDPY 40C00,B0CO4,#2808; 82800=15 

180 P,$12,"TITLE ACORNDISC: *$82800” 

190 Q=(240005)/8 

200 P,*NUMBER OF FILES: "0" 

TO BE SMVED 








240 COPY (A0BOR+(I4B) }, (40BOES (1481) „42800 
250 2807=13;P.$82800,* "IN, SA 
260 EF $A="";$A=$07800 

270 4$951=$42800 
280 4001=$A 

290 MEXT E 

300 P.$12;8=0 

310 FOR 1=0 TO 0-1 











350 2256? (AOCOD+ (128) } +7 HOCOCE (EB) ) 
360 R=256E? (ROCOFHLTHBI }+7(80COBe 188) ) 
370 T=25482(BOCOB+(1EB) 4? (HOCOAHT28)) 
380 eN/256+IN/256=0) HINI256( HO) 

390 WHILE R>=#8000 

400 _ ReR-42000 

410 VERD 

420 IF RC82900 282900 

830 Vak 

0 

450 IF UCN;eb 

460  OSCLI *RSECT",$32,UK,8IZ, EL, 32, bt, S32,AR,S1S 
A70 Uel-NjKeke 1; L=0; R=RHNE256; N=b0 

480 UNTIL U=0 

430 «DIR 

50 605,b 

510 #08CLI "SAVE“,$34,$001,834,LV,$32,% (VAN) „832, 4T,$43 
520 P,'$S51,* SAVED AS *,400I” 

530 NEXT 1 

540 P,'“'*DISC HAS BEEN COPIED*" 

550 «LIB 

560 END 

S70atDSELI"SD",E,845 

580 IFF;P. "INSERT OLD DISC & PRESS KEY*;INKEY C;P,'” 
590 A, 

H00DEOSEL "DD ,N,$13 

bi0 IFF;P. "INSERT NEN DISC & PRESS KEY"; INKEY C;P, 
620 R‚ 
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240 
250 
260 
270 
280 
290 
0 
0 
320 
U 











aAlJTOSHOW. BAS 


INFORMAT TON 
START: #2900, END: #2B7C, LENGTH: #O27C (= 656) 
#LINES: 35, LAST LINE: 350, #FAGES: 4 
LONGEST LINE: 30 (= 55 CHAR'S) 





PROGRAM AUTOSHOW. BAS 


REM:DIT PROGRAMMA DISPLAYED AUTOMATISCH PLAATJES OP 
REM:HET SCHERM VANAF DE SCHIJF. 

REM: DE FILES DIENEN EXTENSIE „FIC TE HEBBEN 

REM: B.V. WINSTON.PIC 


*NOMON 
FOR I=0 TO 1 
*OSCLI "DRIVE",1,$15 






DIR 
N=?RZOOF 
ELEAR4 
FOR J=0 TO N-1 
PH2OIF+ ILG) =13 
XIF INSTR(S(#2010+J#16) ,".PIC") 
T=?{(#2506+J#8) 
=? (#2507+J KB) 
T=T#16; T=T+ (5/18) 
=S16 
IF 5=048=16; T=T-1 
@=z0 
*USCLI "RSEET ",&T," "‚&S," "," 18 4800" ,$15 
PAUSE 90 
COP Y#4BO0 , HBOGO , #8OOO 
ELSE 
NEXT J 
NEXT I 
MON 
FAUSE #0 
P.$12 
END 





Den lat een moe seat pou can do wk ha or AV Phu 
dar in de alice 
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MOTOR--STIJR ING. 


Hierbij wil ik dan voldoen aan de oproep om cok sens 
war copy in te sturen. Verwacht echter seen 
sedocumenteërd verstas over dit onderwerp. Laat ik mid 
even voorstetlen ik ben 69 jaar en had voordat ik mijn 
Atom kocht seen enkete Kennis aansaande etectroniza of 
computers. Via mijn hobby MOdEibouw zas ik bij iemand 
een schakeling van knipperende leds, dit wekte mijn 


interesse en ik sins op zoek naar meer sesevens, 
waaruit een abonnement op het blad HOBBIT volsde 

HOBBIT besen toen een artiketen serie over de 
ACORN-ATOM, WU besrijpt het zeker al? ik moest ook zo'n 





dins, 


Korte tijd nadat ik mijn Atom had aan geschaft en 
hoorde dat er een ciub was opsericht, ook meteen lid 
seworden, Sinds dien zijn er heet wat uurtjes achter 
net toetsenbord doorsebracht, erosramma's in typen of 


laden en ats het liep dan maar proberen er achter te 
komen hoe dat dan wel kwam. Nu, wat jaren later: dank 
zij onze Cciuúb en haar leden, besin ik er iets van te 
besrijpen: er is noe veel wat aan mij voorbij saat, 
maar men hoeft ook niet aties te weten: tach alte 
beetjes hetpen en ats het even kan dan Wit de toch 


sraas op de hooste Zijn van het hoe en waarom. 


At snet kwam ae sedachte bij mij op om de computer 


te combineren met modeibouw. Een portaalkraan maken en 
die containers laten verplaatsen. dat houd in aat er 
motortjes nodie Zijn „-n bestuurd moeten worden. 





Stappanmovoren waren daar net meest seschikt voor: maar 
die zijn nos at arijzis en ats hobbyist=modeibauwer 
denk je dan at Sauw Zou dat niet met sewone hobby 
motortjes te realiseren zijn. Nu daar ben ik dan aan 
besonnen: ik zat het verhaal van mijn bevindinsen niet 
te lans maken maar toch sen paar punten noemen. De 
bedoetins (5 om het motortje via de comeuter zodanis te 
sturen dat het start;stoet,snet of tenszaam draait, 
precies een van te voren opseseven aantal omwenteltinsen 
maakt =n dan OOK meteen stopt. 


Aitereerst een proetoostetlins semaakt van een 
setijkstroom motortje dat toost op 3-3 vott vit 
dumovoorraad. De aan: vit e@n omkeerschakeling is uit 
het blad elektuur van jutifaus. 1384 pas. 7-45. Deze 
Schakeling voldoet soed en stuur ik reselrecht van uit 
de computer,het heeft daarvoor £ aanstuit eunten nt. & 
en B, zijn beide hoos (5 volt) dan sebeurt er niets is 


dus stop, Stet dat A laas is (O valt) en B heos dan 
draait de motor bijv. rechts-om en omsekeerd A is nhoos 
en B is taas dan in dit sevat tirks-om. 

Om met aantal omwentetinsen te kunnen teiten is op 


het motorasje een schijfje semonteerd. In dat Sschijtse 
zitten drie saatjes seboort en wet zodanie dat de 
opto-coupter reaseerdt als er wen saatie voor de 
tafrarode led en de bijbehorende transistor Komt: het 
IICht vatt door het saatje op de transsistor wat dan zo 
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seschakelt Is dat er een pulsje wordt opsewekt dat weer 
doorsestuurd naar de conputer daar dan seteld en het 
totaal van deze binnenkomende pulsen wordt steeds 
verseleken met net opseseven aantat. Is dat setat 
bereikt dan motor stoppen. 


Dit was dan het start punt van waar uit het 
prosramma is opsebotwd. Al snel bleek dat pasic niet 
snel senoes was om alles bìj te houden, zodat het 
Schakel prosramma in mach. taal moest worden uitsevoerd. 
Op onze club seinformeerd naar de beste methode Kreeg 


veschil tende adviezen. Het meest belansrijke „as 
natuurtijk dat iK eerst wat Kennis op deed aansaande 
machine taat van onze Atom. Er is aardie wat literatuur 


over de 6582 op de markt, het meeste in de Ensetse taal. 
Ons ctub blad voerde een cursus van Leendert Bijnaste, 
Leendert bij deze nos hartelijk dank. Verder heb iK 
veel senad aan het boekje "6502 machine code tor 
bestnners” voor hen die de Enselse taat machtis zin =n 
net als ik pas kom kijken in het computersebeuren en er 
toch ook weer niet at te diep in willen duiken een soad 
leesbaar boekje met veel informatie ook over de VIA 
6522 die voor het besturen van apparatuur etc. nodie 
is. Chet Kan waarschiinlijk Oox wet anders maar ik heb 
een 6522 en sebruik hem dan ook} 

Het ‘is een seconpliceerd seval deze chip 6522 de 
Schrijver van het boekje zest er van dat het,”'t werk 
is van een senius en de ontwerpers hebben zeker de 
Nobet Prize voor Chips verdient, Jammer senoes vraast 
ZUIk seniaal werk een senius on het makketijk te 
bearispen. De schrijver sebruikt voorbeelden dus Kleine 
prosramma’s die veel duidelijk maken. (in de vitsave 
die IK heb staan nos al wat drukfouten). 











Het votsende struikel blok was toen: dat er bij de 
zelfde opsave dus zes 500 pursies tellen dan stoppen: 
het werketijke setetde aantat niet altijd setijk was 


maar soms var vit. Dat er meer pulsen setetd werden als 
opseseven, was besrijeeltjk. de motor stond niet direct 
St: It. Stet dat het 15 putsjes meer telde (dat is dus 2 
omwentelingen) als dat steeds het sevgal was dan zou 
ve er 15 minder ceoseven. Maar soms Nas het veel meer. 
Daar ik 3etezen had dat de computer Kijkt, naar de op of 
neer sàande flank van de puls, het is dus van betans 
dat het mooie rechthoekige eutsen zijn. Daarom de 
LMSZ. n_ het schema opgenomen om de pulsen wat op te 
knappen zodat er seen een verloren saat. Dit (oste 
echter het eroblteem niet op. Na wat piekeren en een 
Sltapelose Nacht kwam ik np de sedachte dat het wet 
contact-dender Kon zijn. Ats nl. het motortje stopt en 
de rand van een saatje staat net tesen de rand van de 
lichtstraat dan zal de serinste tritlina tijdens het 
stoppen wel een hoop puisjes veroorzaken terwijl er 
seen sprake is van es verdraaiing. Een anti dender 
schaketins semaakt van een 7400 achter de LME24 pracht 
hier uitkomst. Er moest echter wel een twaede 
opto-coupter bij Komen om de reset puls te seven voor 
deze ftipftoe schakelins ( zie de LOGICA serie in Atom 
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Nieuws van Wibo Visser).Nu is het tellen van het aantal 
pulsjes correct. 


Rest nos: het snet stoppen van de motor, Door eerst 
as motor voor een tractie van een seconde om te polen 
dus tot het moment dat hij net Stil staat en voor dat 
hij werkelijk van draairichting verancerat,: dan pas 
stoppen. Dit aties bracht al  veet verbetering de motor 
draaide niet zo ver meer door en het aantat werketijk 
seteide puisies kwam veel dichter bij het aanta! dat 
ward sevraasd. Het orosram voorziet in een correctie 
routine voor te veert setetde pulsen. De motor keert dan 
om en saat het te veel setelde stukje terus. Dit «an 
achter maar binnen een bepaald raam wat bij mid 2 
pulsen is dus 2/5 omwenteling, Een fout van 2 pulsen 
zou je In dit sevat moeten accepteren. Door het 
erosramma uit te breiden met een routine voor lanszaam 
draaien is de naukeurtesheid nos eroter geworden. : 

Het ziet er nu zo vit? Ste! de opsave is 300 putsJes 





terten, het prosrammà trekt daar 15 vanaf en jaat de 
motor snel draaien tot er 285 putsen zijn sepasseerd. 
Nu wordt er sekeken wat de fout is: stelt dat er 288 


zijn seteld dan wordt de nieuwe opdracht 12 maar nu 
lanszaam. het resuttaat was ERROR ® aus seen fouten. 
Het tanszaam taten araaten van de motor wordt verkresen 
door pulserend te voeden: het prosramma reseit dat. 







OPTO -COUPLER 








PB conw. arn q 
PB 9 coon. rn 10% 
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Uit voorsaande schematische opsteitins biijkt dat er 2 


vitsaande lijnen en 1 binnenkomende Itin moet zijn 
sedefiniserd: nl.: de stuur sisnaten voor as motor 
aan/uit en linksom/rechtsom. dit zijn de uitsaande 
lijnen PBO en PB1 en de binnenkomende tijn die de 


opsdewekte Pputisjes naar PBE transporteerd. 


Er van vitsaande adat de A-paort van de VIA 6522 
wordt setruikt voor de erinter aansturins, bepaten we 
ons tot de B-poort. De R- zowel als de B-poort hebben 8 
aansluitinsen nl.PAG — PA7 en PED — PB7, die we zowel 
„en uit- ats insanas functie kunnen seven. Daartoe 
moeten «we het DATA DIRECTION REGISTOR BR vulien met een 
hekKadecimaat getal zodanis, dat de B bits verdeeid 
worden in een aantal vit- en Insansen in de sewenste 
verhoudins. 


Staat in het bit een 1; dan is het een vitsans. 
Staat in het bit een ©. dan is het een insane. 


De over eenkomstise bits van het DATA REGISTER B, zijn 
dan OOK resp. vit- of insans, Door nu de bits van het 
DATA REGISTER B te vulten met een 1 of een @ zijn we in 
steat om via de SeKOZEN uvitsans een + ot en — sisnaat 
vit te sturen. 


De binnen Komende sisnaten in ons seval de te teiten 
puyisen haten we binnen op PBE daar we dan sebruik 
kunnen maken van het AUXILIARY CONTROL REGISTER. Ars wa 
Al. bit 5 van dit resister 1 maken dan worden de binnen 
komende puisen op bit 6 door Timer 2 van de VIA setetd 
Dit tetten saat van hoes naar laas, wij plaatsen dus 
het setat van het te tetten aantal putsen in deze 
timer, elke binnen Komende puis verlaast dit setal tot 
dat de timer op nut staat: dan wordt er sen vias saret, 
in het Se bit van met INTERRUPT FLAG REG. #REGD. Dit 
laten we de computer in de saten houden: want dat is 
het sein dat de motor stoppen moet. Door meteen de 
timer te resetten, Kunnen we ook het aantal eulsen 
telten dat nos binnen komt na het commando stop: tot 
dat de motor werketijk stilstaat 


ELT NO, 7E SS 4 


KS 
Nn 
_ 
& 





DATA DIPECT.REG.B bit ® t/m 3 vitsans. @ 0081111 
adres #EHG2 


DATA REG.B mator start rechts-om. eene se 
adres #ES00 
DATA FEG,B motor start 1 inxs-om. essaessBi 
adres #EC2D 
DATA REG.‚E motor stop. ensoseert 


adres #E500 
AUXILIARY CONTR,REG.wijst naar timer 2 BO 1 0 ese 
adres #ESOR 

INTERRUPT FLAG REG.timer 2 vias seset? 3 0 it esse 
sdres #ESOD 

ATOM BUSCONNECTOR PIN NZ. ce ris A 


u 
re 
dj 
m 
“ 
D 
0 
ed 
« 
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18 PROGRAM MOT. & SPEED CTRL, 
SO REM BY JOOP BALLYNS 

7 P,$12 

158 ZERO 

168 DIN LLS 

158 DIM PC-D) 

152 F=t322E 

18 P‚s2tin 

178:U@ LDAAMOF ISTAELIBZ 

188 LDARZO:STREDEDP 

198 LDAET20ISTARESRE 

789 LDARI23:STAHPBI 

285 RIS 

DELLE LDRDOLGSTAETSZ 

209 LDAKSIJGSTARBEDR 

28 JSRF 

243 LDARASISTAKSIT 

255 LDAGBTISTAABEON 

2E3 JSRF 

270 LDRAE20 

268 BITKBEOD: BEG LLL 

238 LDART25; STAKEDOM 

WELL? LDYARIE 

ZGT LORETIS 

T20:ilá LONT 

30:15 DEKFDNE LLS 

JÖ SEC;SBCHOLSDNE LLA 

FO HEY: LLJ 

9 LDAMATISTALBSOE 

370 LOMESOS 

30 PES 

&60:1L5 LDAFTST: STRIBSRD 
&7O:LL7 LDAM20:BITEEENDSEEG LL 
489 LDAETZS:STAEDODE 

430 JSR UL2 

Sca RISse 

558 GOTG 1078 

S4Bal INK LLBEL INK LLE:GOTOc 
SSZLINK LLBSLINK LLL 

SCP, SE 

38 Jt 255 

Se IF B=t GOTD GEE 

SQ Ilke 

EE F‚2=@ TO IBIMRITEN. 

E13 XPS? 
529 Wet Ja) ek 
EB Asha 
640 E=R-1 
ESP,”  REDUESTED NMNBER=",J" 
560 P‚ “ACC. RECUIRED NUMBER=", 1 





678 P.* RETURL COUNTED=", W° 
€2a P‚- ALC. ACT. EDUNTED=", Â° 
630 P‚* ERROR=",E 
zee Pr. CYCLES=", C° * 


118 FDR S=t TD GB:MAITEN.5 


MOTORSTUR ING 
728 REN STOP 
738 IF RESCEI 2 THEN GOTO 770 
7e sen 
Te 89 
7E GUTO 1678 


778 IF E18 THEN COT 858 

789 REN A, OLCCK-WISE CORRECT. 
70 Kast 1FLSABSCE) BHD RAD 
oet DtB2B=1: DOS. b 

es GO 748 

B28 REN CLLEK-WISE DORRECTION 
BB Km 15 RDSE) Br HO O2 
Dad DDL sB=1: BOS. 

E58 GOTD 748 

125% GOTD 058 

1068 RESTORE 1448 

1878 REM STOP 

1968 READ ‚NGT 

188 IF MO THEN END:REN GOTO 1068 
1189 IF Med THEN GOTO 1220 
1t1@ REN CALCUATE M/S t L/S 


1120 HEN/25E +REM M/S 
1138 LeN-He256 FREH L/S 
1148 PEN 


1158 IF Mei THEN T4:GOTO 1108 
1168 IF M=2 THEN GOTD 1200 

1178 IF K=5 THEN GOT {218 

1188 IF Gzt THEN R=#E2;D=001 Kel 
119@ IF Ge2 THEN R=MB1:DA02iK=1 
1298 REN CONTROL FOR MOTOR 2 
1219 REM CONTROL FOR MOFDR 5 
1222 REM CONTROL FOR SOLENOID 
1236 P. “NUBER=",N" 

1240 P,“  M/Sz",H' 

1258 "Use", L" 

1258 IF Ko-1 THEN P, “CLOOK-WISE“" 
1278 IF Kel THEN P,"ANTE OLOOK-WISE"" 
1585 FOR S=@ TO GEEMAITEN S 
1318 REN STOP 

1520 P.s12 

133 Cell 

1348 P.* MTOR RUNNING *" 

1550 PF, "enmorstensnsenng 

158 IF 015 Lst-15:G0TOa 

1355 REM STOP 

1578 GOT» 

LGB GEN DATA BELON: 

1äl@ REX MITOR NAMBER- PULSES- 
1620 REM DIRECT TON-VERTRAGING 
1648 DATA 1,300: 1, T 

1450 DATA 1,308, 2. T 

1468 DRTA 1,360, 1,7 

1678 DATA 1,300, 2, T 

1488 DATR 1,308, 1 T 

1498 DATA 1,308, 2,7 

3e PATA B-R.D 0 


JOOP BALLIEJNS 


adtes ver, 


#35 = 
La 2 Kent 
HILDE 
#555 
355 


#s5F 


SNarab 
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Het onderstaande prosramma hoort etsenlijk thuis In het 
srote prosramma: het is nodis voor het lanszaam laten 
draaien van de motor, het Is de vertrasinss-routine die 
de bulserende stroom stootjes verzorst. Dit prosram 
laden in het hogere sehevoen: het assembleerd op #522E 
waar JSRF zie o.a. regel 258 van het hootdprosram naar 
toe springt. 


19 PROGRAM VERTRAGING 
22 DIM Waz 

53 P=tI22Err 

4D VVD LDY #10 

SB: VVI LDA #537 
E@rVV2 DEX 


78 BNE VV2 

en SEC;SBC 9401 
1e ENE VV1 

118 DEY 

120 BNE VVO 

150 RTS:e 

148 END 


BESCHRIJVING van Prosram MOT.& SPEED CTRL. 


158 Zet all de variabeten op nut. 

152 De WHI2Z2E staar de seassenbleerde vertrasinss 
routine, de wachtijden tussen start en stop voor het 
tanszaam draaten. 

172 Maakt bit @ t/m 3 uitsans en 4 t/m 7 insans van het 
DATA DIRECTION REG. B. 

128 Wijst naar TIMER 2 AUXILIARY CONTROL REG. 

190 Laad TIMER 2 Low Bite (least sianificant) = v, 
adres #I2D 

209 Idem ny Hieh Bite (most sionificant) m var, H 
adres #329 

203 Return subroutine 

210 Geett de var. V de waarde #01 dus op adres #&T27 
staat nu de waarde Bl. Var. V bepaalt de de tisdsduur 
van de vertrasinss routine op #Z22E ( motor aan of 
motor vit tev.b met het tanszaam laten draaien van de 
motor). 

229 #532 is het adres van Var. R en de toegekende 
waarde van R = #01 of #82 ai naar selans de motor 
rechts- of links-om moet draaien. #BS08 = net sdres van 
net DATA REG.B. 

258 Serins naar routine op NE2ZE. dus de tijdsduur van 
moter aan. Tiid Om: dan terve naar volsendte opdracht. 
240 Deetft var.V nu de waarde van D5 dat maakt de 
tivdsduur dus wat lanser. 

50 Plaatst #@7 in #BE2D HOE = CAADDA11 pit B en 1 
tin nu beide 1 dus de aanstyitpunten Aen B van de 
motor-sturines print zijn beide hoos met het sevols vat 
de wotar stopt. 

s6O serine naar #322E (tijdsduur motor stoe dan terus 
naar vis, commando. 

270 #20 = ON100POD bit 5 is dus ft Dit setat wordt in de 
acrumutator seplaatst en het BIT commando in resei 280 
verselijkt dit met het setat dat in #RREOD het INTERRUPT 





L 
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FLAG REG. staat. Is bit 5 hier ook 1 dan is TIMER 2 
vitseteid en wordt verder sesaan met de vis. vesel, nos 
niet vitseteld dan terus naar LL1 (reset 210) 290 keert 
motor om (omeolten am snel te stoppen) 

205 t/m 258 wachttus tijdsduur van omsotenr in te 
stellen met va, T adres #555. 

350 Stopt motor. 

578 Reset TIMER Z, bit 5 in bet INTERRUPT FLAG REG. 
(door het uittezen van #BSD8 = tow order counter) 

388 Return subroutine 

AEB Start motor (snetdraaien) 

47® TIMER 2 al ktaar? 

488 Ja? dan ompolen 

4398 Sprine naar wachttus: en stop dan motor 

528 Terua naar Basic 

1080 M staat voor wetke motor 1,2 of 5 Croekomstise 
uitbreiding). 


N is het aantal pulsen dat de motar moet verdraaien. 





G ais G=1 dan rechts-om draaien: 2 is links-om draaien 
T zie boven reset 308 t/m 550, verschilt van motor tot 
motor. 

1119 Ats N ) 255 dan moet N omserekend warden in LS en 
MS zie boven resel 190 — 209. TIMER 2 bestaat uit: LOW 
ORDER COUNTER #BE0E en HIGH ORDER COUNTER #BSD9. het 
adres van vartabete L = #52D; van H = #529, 

1168 — 1178 toekomstige vitbreiding 


- 1198 zie 1268 — 1278 r 
= 1228 Hitbreidins. 
= 12508 Zie tekst. 
Wachttus om beeldscherm Te lezen. 

eyete tetter 

keuze tanszaam pt sneidraaient aber 2 is 
sneldraaien 

1378 lanszaam draaien: tabel b 
570 Zie E59 
SEB Skip 598 ats er zen correctie wordt vitsevoerdizie 
Bo8 en Sad 
590 Zie EED Optellen of Aftrekken van totaat setalde 
pulsen, vitsaande van af: het startpunt, tesensestelde 
draat richtins wordt dus weer atostrokken vitsezonderd 
bis het uitvoeren van een corectie, 
EOB Wachtius om de motor setesenheid te seven Werkelijk 





hes- Of 1inks-om. 











rat Stitstand te komen voor dat de tetter wordt 
vitsetezen. 

&i0 X= het aantal seteltde pulsen die nos na het stop 
commando zijn binnen sekamen, 

520 We Ket werkelijk setelde eantat J+Xt K maakt dit 
setal + of =— al naar Selans de draairichting. 

E30 A= net totaat seteide aantatt in dit prosram dus 


van atle 6 cycles (6 DATR resels met opdrachten) Ais er 

seen touten zijn semaakt dan is in dit proeram RA=0 want 
3x 508 Pputsies rechts-om en dan 5 x 500 eutsjes 

tinks-om brenst je weer terus op de uitsanss positie. 

540 E: de fout dus het aanta! te veel ot te weinie 

seteide puisen: in het sevalt van voorgaande resel is E 

dus sok =0. 

710 wachttus voor gittezen van beeldscherm. 

ZED — SSA Correctie=routine vonr tinks=- =-n rechtsom. 
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Bis de tout )2 is dan correctie uitvoeren met lanszaam 
draaiende motor, 


Het is een wat lans verhaal seworden maar mischien 
dat iemand er war aan heett. Het prosram zal 
onsetwijteld wel verbeterd kunnen worden, ik weet ook 
nos niet hoe ik straks 2 motortjes Teselijk Kan Taten 
toeven, Elk heeft dan een verschittlende opdracht, Een 
soort X en Y as beweging, het moet toch wel Kunnen op 
interruet basis. Heett iemand een tip in die richtings? 
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EINDELIJK, DAAR IS IE DAN : EEN GOEDWERKEND PROGRAMMA OM VAN 
CASSETTE NAAR DISK TE COPIEREN 


CASDIS 


Volledig herschreven en gebruiksvriendelijk gemaakt door C. de 
Moor (met dank aan Henk Reynders van wie het programma 
oaorspronklijk afkomstig is) 


We hebben diverse prachtige programma’s om een complete discette 
naar cassette te dumpen al dan niet ap 390 of 1206 baud. 

Ziezo, daar staat de hele zooi dan op. 

Ook ik (E. Sanders) werk op deze manier het tekort aan discettes 
weg. 

Maar dan gebeurt het......... 

Er belt een lid aan en vraagt doodleuk of hij een schijf zou 
kunen krijgen die allang niet meer in de omloop is Gelukkig 
staat de zaak nog op (archief)cassette. Dus programma voor 
programma laden en naar disk schrijven. Weer een avond naar de 
vennen en wat erger is, doordat het met de hand moet 
gebeuren, zitten er natuurlijk (copieer)fouten in. 

Zodoende heb ik Charl de Moor gevraagt om het programma van Henk 
te verbeteren en wat gebruiksvriendelijker te maken. Dat dit 
zeer goed gelukt mag wel blijken uit het feit dat ik het 
programma reeds geruime tiid (probleemloos) gebruik. 


Als je het programma runt krijg je het volgende te zien: 
COPY CASSETTE > DISCETTE 

MET CASDIS RELEASE 2.2 

(C) 1985 CDM-SOFTWARE 

DIT COPY PROGRAMMA MAAKT 

GEBRUIK VAN DE FCOS EN SCOS 

ROUTINES VAN DE AXR-t ROM. 


Druk nu op een toets en dan verschijnt: 


CASDIS REALEASE 2.2 


ASSEMBLEREN NAAR 7 


SCHAKEL ADRES 7 
BUFFER ADRES 7 
PASS 1 
PASS 2 
READY 


Wat is nu de bedoeling dat je invult 7777 

Bij ASSEMBLEREN NAAR geef je het (hexadecimale) adres waar het 
pagramma naartoe geassembleerd moet worden. 

Bij SCHAKEL ADRES geef je op #BEFF. Het programma is echter zo 
slia dat hii zelf de AXR-1 of de JOSBOX opzoekt (ook met 
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schakelsoft) . 

‘Bij BUFFERADRES geef je het (hexadecimale) adres op waar het te 
copieren programma zolang mag staan. Voor mensen met een 
geheugenkaart bv #4000. Let er wel op dat het te copieren 
pragramna niet over de #8000 heen gaat. Als je als bufferadres 
#4000 opgegeven hebt mag je programma dus maximaal 14K lang 
zijn. 

On aisverstanden te voorkomen: ondanks dat de programma’s naar 
#4000 (in dit geval) gaan komt alles toch op de schiif zoals het 
oorspronkelijk was. 

Je zou de geassenbleerde versie van CASDIS nu op schijf kunnen 
zetten. 

Na het assesbleren (of na het inladen van de machinetaal versie) 
link je naar het adres wat je bij ASSEMBLEREN NAAR hebt 
apgegeven. Er verschijnt nu het volgende op je scherm: 


CASDIS RELEASE 2.2 
(C> 1985 CDM-SOFTWARE 
BUFFER :#4000 (dit adres heb je bij BUFFER ADRES opgegeven) 


S) SCOSS: 3500 BD 
F) FCDSs 1200 BD 


MAKE CHOISE? ‘druk nu op S of op F) 


PLAY TAPE 
En zie ĳ…….…e-vee-… âalles wordt nu netjes naar de schijf 
gecopieerd, en …- je hoeft er niet eens voor thuis te blijven. 


Let er wel op dat er voldoende ruimte op de schijven aanwezig 
is. 


Ik hoop dat jullie net als ik veel plezier en gemak van dit 
progamma zult hebben. 


Voor de fanatiekelingen onder ans volgt hieronder de 
programmalisting: 


10 REM CASDIS RELEASE 2-2 

20 P_$6$12;CLEARO; B=0 

30 P.“COPY CASSETTE > DISCETTE"’"MET CASDIS RELEASE 2.2"’ 
40 P."(C) 1985 CDM-SOFTWARE"*” 

50 P.“DIT COPY PROGRAMMA MAAKT"* "GEBRUIK VAN DE FCOS EN SCOS" 
40 P.°”"ROUTINES VAN DE AXR-1 ROM, "” 

70 LI.#FES4; P.$12"CASDIS RELEASE 2,2"°"" 

80 IN. "ASSEMBLEREN NAAR "GQ 

90 IN. "SCHAKEL ADRES "5 

100 IN. "BUFFER ADRES d 
110 DIM SS40;P.$21 
120 F.1=0T040; SSI=8FEFjN. 

130 F.I=1T02;F=0; ?7#E8=0 
135 P.$6’ "PASS “I$Z1 

140L\ START ASSEMBLER 
150: 550; LDX@R08; DEX; BMISSS; STXS 
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160 LDA#A4FF ; CMP@HOB ; BNESS50+2 

170 JSR #EEEZ 

180:555; JSR #F7D1 

=HOFOLOAOCGF=P+A; $P="  CASDIS RELEASE 2.2 





!P=#ODOA;P=P+2;SP="  (C) 1985 CDM-SOFTWARE";PeP+L.P 
210 !P=#0DOAOA;P=P+5 
220 sP=" BUFFER : #"*;P=P4L.P 


230LLDAE(W/256) ; JSRHFBOZ; LDAG (WX256) 3 JSRHFBO2: JSRHFTD 15 1 





240 !P=KODOAOA; P=P+5 
250 $P=" S) SCOS: 300 BD";P=P+LENE: HODOAs Fz +2 
260 $P=" PF) FCDS:z 1200 BD";P=P+LENP; !'P=NODOAOAs P=P+3 





270 $P=" MAKE CHOISE 2" ;P=P+LENP: [; NOP 

280: 551; JSRHFES4; CMP@#5 3; BEQSS2; CMFBR4G; BEUSSS 
290 JSR&FD1A; BNESS1 

300: 552; JSRRFES2; JSRSS52; JSRSE3S; JMPSS4 
310:885; JSRHFES2; JSRS5E23 JSRSS34; JMFSS4 


320:554 

330 JSRAFFED; JSRHFFED 

340 JSR#F7D1; JSP="  FLAY TAPE"; PaP. P: !P=&ODOA0Az P2P+353 C3 NOP 
350: 558; JSR5S28 7 
360: 557; JSRS5525 


370 JSR 5530 

380: 5510; LDYB#OOs STY#DC; STY4DOs STYUDL 
390 SEI; JSRHFBBE 

400 BVCSS18 

410 BNESS10 

420 LDY@#FF;STY#DD 

430: 55113 INY 

440 JSRAFFDA; STACHCH) ,Y 

450 CMP@#OD; BNESS1 1 

460 JSRHFBEZ 

470 LDY@K08 

480: 5512; DAHD3, Y; STA #CA,Y;STA #9B, Y 
490 DEY; BNESS1 2 

500 LDY@#oa 

510 LDA@#z0 

520: 5514; STA#AS, Y 

530 DEY;BNES514 

540: S815sLDA GLI), Y 
550 CMP@#OD; BEGSSI& 
560 STAKAS, Y 

570 JSR#FESS 

580 INY;CPY@#07; BNESS15 
590: 5516; JSRHFFED 

500 LDA® (W/254) ; STARCG 
610 LDYS(WAZ56) ; STY#CH 
620 DEY;STY&CD 

830 JSRHFSEB 

640 BCCSS13 

650 INC#DO; INCHCC 

640 JSRSS17 thai lu pant itev No etc bad … 
670: 5513; SEC 

680 LDA#IC: STARAO: ADCHDE: STAKA2 

690 LDA#DS; ADCEHOO; STAHAS 

700 LDAKID: STAKAL 

710 JSR5S32; JSR#EGLD 

720 JSRS531 

730 JSR#EGBO: JSRHE226 
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740 JMPSS9 

750:S517;PHP; JMP #F9BO 

76015518; JMP&CSSB 

770:5S523;LDX@ROB 

780: 85243 LDA8FFAZ, Xs STANZOC, X 

790 DEX; BPLSS24 

800: 5525; LDXE#0S 
810:5524;LDAKBO, X3 STAN214, X 

820 DEX; BPLS5263 RTS 

830: 5528; LDX@ROS 

84058529; LDAR214, X; STANBO, X 

850 DEX; BPLSS29;RTS 

860: 5530; LDA@#40; STANCH 

870 LDY@RO1;STYACA;RTS 

880: 5551 ; LDA@ (W/256) ; STAR9D 

890 LDA®(WA256) 5 START 

00: 5552; LDXEKOF 

910 LDAKEOOO; CMPB#AF ; BEUSSIS 

920 JSRF7D1; Js !P=#ODOAOAO7T;P=P+43$P=" MISSING DOS AT #E00O0" 
930 P=P+LENP; !'P=#0DOAO0A; P=P+3; CNOP; JMP&CSSB 
94015553; LDABEFZA, X3 STANZOC, X 

950 DEX; BPLSS53 

960 LDA@#OO; STAKEE; RTS 

970: 5554; LDXEK0B; CPXHAAFF ; BNES55 39; BEGSS36 
9BO: SSS5;LDX@#O5; CPXHASO Es BNESS39 

990: 8536; LDYEROF 

1000: SS37;LDAHASIB, X; STAR2OE, Y; DEX; DEY; BMISS38 
1O10CPY@R05; BNESS37 ; L.DY@#O1 3 BNESS537 

1020: 5558; RTS 

1030: SS39; ISRAF Di; 1 

1040 !'P=$ODOAO7OAsP=P+4j Pz"  AXR-1 MISSING" ; P=f+LENP 
1050 !P=#ODOA; P=P+2; CNOP; JMP4CSSB 

1060JjN.; IF?EB=#25:GOTO1080 

1070 P.$6’”"READY"?’ SEND 

1080 P_$6°’ "OUT OF RANGE DETECTED"?"; END 


MOL IST . 


Dit pragramma bouwt een bleak regels op waarvan de regelnummers niet 

=p het beeldscherm verschijnen, en die op het scherm altijd 22 
zijn. 

Eee ontstaat een leesbaarder geheel dan met REMregeis het geval 

zou zijn. Het blok haeft niet vanraan in een listing te staan; het 

mag bijvoorbeeld warden voorafgegaan doer een regel met PROGRAM. 

Het programma geeft het eerste vrije regelnummer aan en het 

tartadres van die regel. 

as op met wijzigingen in lagere regelnummers! RENUMber liever 

ts ap dat TOF goed staat. 











eerst, Let en v 


Wim Osterholt 
Regiu Fatterdam. 


Wilt u lld worden van, de ATOM COMPUTER CLUB. 


Neem dan contact op met de penningmeester van de regio waar u 
bij ingedeeld wilt worden. Hij kan u vertellen waar de 
vegiobijeenkosten zijn en wat u als lid kunt verwachten. 


Regie NOORD: 
D, Uuldriks Wiemers 14 9642 KG Veendam 
25987-19611 


Regio OVERIJSSEL /GELDERLAND: 
N. van Wijnen Korte Dreef 12 55302 BS Emmeloord 
85270-15583 


Regio TWENTE: 


D. ter Harmsel R.v. Schevenstraat 37 7521 SC Enschede 
2535-359034 

Regio NOORD-HOLLAND: 

P. van Kuik Zuideinde 54-a 18435 JP Groot-Schermer 
2997-1982 

Regio DEN HAAG: 

Th. Waayer L. Couperusstraat & 2274 XP Voorburg 
8782-862504 


Regio DELFT: 
F. van Morgen M. de Ruyterweg 21 2628 BA Delft 


Regio ROTTERDAM: 
R.. de Haan Brasem 125 2986 HA Ridderkerk 
21884-25160 


Regio CENTRUM: 
P. van Mourik Ruiterstede 68 3431 XN Nieuwegein 
25402-48781 


Regio ARNHEM: 
J. Hartog Keyenbergseweg 60 6871 WK Renkum 
83573-13757 


Regio Zeeland: 


E. Gíijssel Derpsstraat 86 4424 CZ Wemelding 
@1192-2121 

Regio BRABANT-OOST: 

P. Ehrlig Roostenlaan 266 5644 B5 Eindhoven 
0409-114185 


Regio LIMBURG: 
A. van Zantvoort Mozartstraat 528 6344 RS Roermond 
@4750-21797 


Regio BELGIE: 
R. Leyssens Oude baan 127 3550 Heusden Belgie 


Eventueel kunt u de contributie rechtstreeks overmaken per bank 
of giro aan de Atom Computer Club te Groenekan. Vermeld echter 
uw volledige naam, adres en de REGIO waarbij u ingedeeld wenst 
te worden. 


